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summary 

PERSONNEL CASUA LTY STUDY 

A computer simulation model for evaluating the effective¬ 
ness of sheerer systems was developed under Office of Civil 
Defense (0(d)) Contract OCD-PS-64-50 Subtftsks 1614-A and 1125-A. 
The Shelter Evaluation Program (SEP) permits shelter evaluation 
in terms uf the casualties produced from initial effects of 
nuclear weapons. The model was divided into the following 
components: 

• The propagation of nuclear weapon effects through 
the free-fleld. 

® The attenuation of the free-ficld effects as they 
interact with local obstructions. 

• The. effects of the shelter on the transmission 
of the. weapon effects to the personnel within 
the shelter. 

m The response of the personnel to each of the effects. 

• Test of personnel response against casualty 
of injury or death. 

This is the final report on Subtask 1125-A and deals 
primarily with establishing quantitative data for use as 
casualty criteria. The following casualty mechanisms were 
considered; 

• Primary Blast - Experimental data collected 
from animal experiments were extrapolated 
based upon weight of the species and resulted 
in an estimate for LD50 of an overpressure 
equal to 62-64 psi. Detailed overpressure wave 
forms were found to be relatively unimportant. 
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« Debris Effects - Three debris mechanisms which 

cause casualties were identified: impulse loading 
related to debris momentum (MV); crushing or tear¬ 
ing related to debris energy (MV 2 ); and cutting or . 
penetration related to energy times the square of 
velocity (MV^). Wound data for human cadavers 
and animals were reviewed, and casualty criteria 
were developed as a function of mass and velocity 
of the debris fragment. 

& BLast Displacement - The mean velocity of impact 
for 50 percent lethality of small rodents was 
36.4 feet/sec. This did not show a significant 
variation with weight, as a result, this criteria 
was applied to humans. 

© Thermal Radiation - Second and third degree burns 
resulting from direct exposure of the skin, re¬ 
radiation from clothing heated by the thermal 
energy, and ignition of the clothing and subse¬ 
quent burning of the skin were considered. 

Percentage of mortality was then related to 
percentage of the body area burned. (See Fig. S-l.) 

s* Initial Radiation - Radiation casualty criteria 
were determined by extrapolating animal data 
based upon Hiroshima-Nagasaki results. The LD50 
for illness and death were set at 150 and 500 REM 
respectively with a standard deviation of 20 per¬ 
cent. 

The SEP code is described and sample application of the 
code presented. The following conclusions can be made based 
on the results of the computer code and the information 
gained in conducting this study: 
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© The computer code provides a means of evaluating 
the protective capability of various shelters, 
provided adequate information describing the 
shelter is available. 

c> Many of the casualty criteria are studied estimate 
and require further refinement. 

© The interaction of free-field blast effects 
and structures is an important link in the 
prediction of casualties. The present in¬ 
formation on this subject is insufficient. 

0 The posture of personnel in relation to blast- 
wave affects their survival probability. This 
is shown by the differences in casualties for 
personnel standing and lying when under blast 
wind translation. The response during the 
translation may also be an important factor 
in lowering casualties. 
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ABSTRACT 


This investigation has resulted in the development of a 
computer code (SEP - Shelter Evaluation Program) which predicts 
casualties of personnel when subjected to the initial effects 
of a nuclear weapon. Conditions for both sheltered and un¬ 
sheltered personnel were considered. Available casualty data 
were analyzed and functional relationships between casualty 
and appropriate weapon effects were approximated. Analytic 
models relating the weapon effects to these casualty functions 
were also developed for SEP Code. A validation of the code 
was performed using existing Hiroshima data. Finally, results 
are presented for a range of construction and weapon parameters 
to illustrate how SEP Code may be easily utilized to study 
shelter effectiveness iu terms of added survivors. 
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SECTION I 
INTRODUCTION 


The rational development of a nationwide shelter system 
must be based upon a tradeoff between the effectiveness of the 
shelter system, as measured in terms of increased survivors, and 
the cost of the system. Estimates of survivors in urban areas 
subjected to a specified nuclear attack have been based upon 
empirical casualty models which have been developed from 
Hiroshima data. Even accepting the large extrapolations of 
this data from the yield of the Hiroshima device to yields of 
current interest, one still cannot reasonably alter the data 
to incorporate structural mixes which vary from Hiroshima. 
Certainly ''slanted M construction and designed shelters will dif¬ 
fer in their response and protection level from the Hiroshima 
buildings. 

The objective of this study has been to develop a casualty 
model which admits a broad range of shelter configurations and 
attack conditions (i.e., yield and height of burst). The ap¬ 
proach taken was to develop an analytical model which was then 
to be validated with specific data points from the Hiroshima 
detaonation. The development of such a model can be conveniently 
divided into the following components: 

• The propagation of weapon effects (air blast, 
dynamic pressure, thermal radiation, and 
ionizing radiation) through the free-field 
(i.e., over an idealized plane surface). 

e The attenuation of these free-field effects 
p.s they interact with the local obstructions 
(buildings and/or natural topology) of the urban area. 

o The effects of the shelter on the transmission of 
the weapon effects to the personnel housed within 
the shelter. 
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• The response of the personnel to each of the 
effects. 

• Test of personnel response against casualty 
criteria to determine the probability of injury 
or death. 

It should be noted that the term shelter is used in its 
broadest sense in this text. The description of a given type 
of shelter as used in this program defines the degree to which 
the free-field nuclear environment is attenuated in passing 
through the shelter. The types of shelters considered include 
conventional construction where there is some attenuation of the 
free-field effects, and shelters designed to resist given over¬ 
pressures, with effects on unshielded personnel being included 
for comparisons. The interaction and attenuation of the free- 
field environment with a range of conventional buildings is 
automatically handled within the computer code prepared during 
this study. The code has also been prepared in a format so 
that other shelter configurations may be considered by process¬ 
ing the attenuation afforded by these shelters as input to the 
code. 

A product of this study is a computer code organized ac¬ 
cording to the above five components. While it is recognized 
that interactions may well occur between each of the above 
phenomena, they are assumed to be uncoupled for this "first 
order" model. If a better understanding of the interrelation¬ 
ships become available, then the code may be easily modified 
to include these higher order effects. During the development 
of this code it has been our objective to produce an operable 
code which could be checked against available data and used for 
sensitivity studies. These applications hopefully will point 
to specific facets of the code requiring further improvement. 

The code has been so prepared that such modification may be 
easily added as they become available. 
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• This study was performed in parallel with a companion 
study, "Parametric Study of Shelter Vulnerability" (Subtask 
1614-A) Ref. 45. The gross characteristics of the model were 
developed during that study waile this effort was concentrated 
on the development of casualty criteria. As such the discussion 
of casualty criteria is given a prominent place in the report 
(Section IX). 
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SECTION II 


CASUALTY CRITERIA 


Rather extensive experimental data are available des¬ 
cribing the susceptibility of animals to the effects of a 
nuclear detonation. The purpose of this study was to construct 
a computer model based upon these data for predicting the per¬ 
centage of casualties resulting from a nuclear detonation de¬ 
pending on the shelter configuration housing the populus. Two 
interpretations of the data were required to achieve this ob¬ 
jective. First, the animal data had to be extended to encom¬ 
pass the human. Second, the condition inside a shelter had to 
be related to the experimental configuration. It should be 
noted that casualty criteria define levels of blast, shock, 
thermal, debris and radiation exposure required to cause death 
or injury to personnel. The propagation and attenuation of 
these weapon effects over the free field and interacting with 
shelters are not considered as a part of the definition of 
casualty criteria. 

2.1 PRIMARY BLAST 

The response of personnel to primary blast involves many 
complex interactions of the free—field blast with the shelter. 
While these interactions are not per se of concern to the 
casualty criteria they are significant in that they affect the 
form of the criteria. For example, consider the problem of a 
man sitting in the center of the room with a small opening to 
the outside environment. The following event occurs: 

• The free-field pressure pulse reflects off 
of the exterior of the shelter resulting 
in an increase in pressure. The duration 
of which is related to the clearing time 
of the wave around the structure. 
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• The blast energy begins to bleed into the 
room through the opening with the particle 
velocity and rate of pressure rise depen¬ 
dent on the size or opening, volume of the 
room, and outside pressure. 

• Complex reflections occur within the room 
as the pressure rises. 

The man in Che room is therefore subjected to a pressure 
pulse which rises in steps to a peak and then decays slowly in 
time. The size of the steps depend on the room geometry, posi¬ 
tion of the man in the room and size of window opening; the 
peak pressure depends on these same parameters plus the external 
environment. The treatment of all these factors is clearly 
impractical for the first order model being developed, and a 
simpler formulation has been devised. 

Much of the work reported in the literature on blast 
effects of nuclear detonations on animals and people has been 
conducted by Dr. C. S. White and his co-workers at the Love¬ 
lace Research Foundation in New Mexico. Unless otherwise in¬ 
dicated, the information reported in this section was obtained 
from Lovelace publications and at a meeting with Dr. White. 

Four experimental variables were examined in the Lovelace 
sutdies of primary blast: (1) species of the animal; (2) dura¬ 
tion of the pressure pulse; (3) orientation of the animal to 
the wave front; and (4) onset of the pressure wave. Data for 
eight different species of small mammals were used to extrapo¬ 
late results to the weight range of man. Pressure pulse dura¬ 
tions ranged from 3 msec to 20 sec in the various experiments. 
One experiment had animals placed in four different positions 
with respect to the onset wave. The onset of the blast was 
instantaneous, gradual (several milliseconds), stepwise, or 
instantaneous (preceded by increased initial pressure) in dif¬ 
ferent experiments. Only instantaneous onset was used with all 
eight species. 
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Extrapolation to the human weight range was performed. 
Where basic mortality data were available, probit analyses 
were computed and estimates of overpressure for 50 perrent 
mortality (LD50) made. The pulse duration effect was corre¬ 
lated with respect to body linear dimension (cube root of 
weight). Experiments with stepped onset of the pressure pulse 
were reexamined to determine the importance of reflected pres¬ 
sure on the LD50. 

Pressure adjustments over short time intervals are ana¬ 
lyzed in detail. This bridges the gap between instantaneous 
onset and pulses preceded by gradual or stepwise pressure in¬ 
creases. 

2.1.1 Instantaneous Blast Onset 

Table 1 shows mean body weight and LD50 for the follow¬ 
ing experimental animals: mouse, hamster, rat, guinea pig, 
rabbit, cat, dog, and goat. Estimates for humans were ex¬ 
trapolated on the basis of linear dimension (i.e., cube root 
of weight) because this scaling technique provided the best 
fit to the experimental data. Other scaling parameters con¬ 
sidered were log weight, two-thirds root of weight, and the 
weight itself. There were no significant differences between 
the data fits for other extrapolations. 

All values shown in this table correspond to 12 psi am¬ 
bient air pressure and 24 hr mortality. Extrapolation of the 
LD50 based on linear dimension is shown graphically in Fig- 1. 

2.1.2 Blast Pulse Duration 

Duration of the pressure pulse is not a significant 
variable in the range of body weights relevant for humans and 
megaton range weapons. Although short durations (1 to 10 msec) 
result in reduced mortality in human weight ranges, no great 
reduction occurs ir. longer durations (in excess of 20 msec) . 
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Table 1 


EXTRAPOLATION 

OF MAMMAL LD50 TO 

HUMAN RANGE 

OF SIZES* 


TWIy 



Species 

Weight 

(kg) 

LD50 

(psi) 

Deviation 

(psi) 

Mouse 

0.022 

30.7 

- 0.56 

Hamster 

0.089 

28.6 


Rat 

0.192 

36.6 

- 0.61 

Guinea Pig 

0.455 

34.5 

- 0.64 

Rabbit 

1.97 

29.6 

- 0.90 

Cat 

2.48 

43.6 


Dog 

15.1 

47.8 

- 1.06 

Goat 

20.5 

53.C 

-2.79 

Estimated 

Mammal** 

70.0 

63.2 

- 5.8 

Child 

20.0 

50.9 

t 4.4 

Average 

Woman 

50.0 

59.4 

t 5.4 

Large Man 

90.0 

67.7 

± 6.1 


'< Lz psi ambient pressure” 24 hr. mortality. 

** LD50 for 70 kg mammal at sea level (14.7 psi) 
would be 62-64 psi based on data from Ref. 1. 


The short duration reduction is inconsequential since applicable 
peak overpressures (less than 200 psi) have durations consider¬ 
ably in excess of 20 msec. Even within shelters pressure change 
will occur within a few reverberation times. Therefore for a 
10 ft room and shock velocity of 1,000 ft per second duration 
of at least 20 msec are to be expected. 

2.1.3 Orientation to the Blast 

The orientation of the animal to the shock wave was 
found to be of minor importance. No significant differences re¬ 
sulted in an experiment with guinea pigs in four different 
positions with respect to a shock wave (Ref. 3). Orientation 
does not seem to be an important factor when the position of 
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24 hr Mortality 

12 psi Ambient Air Pressure 
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Body Dimension Scaled by Cube Root of Weight (gr)l/3 
Fig. 1 EXTRAPOLATION OF INSTANTANEOUS BLAST ONSET LD50 TO HUMANS 





the animal does not change the waveform to which it is exposed, 
or when the pressure does not significantly change ever the 
length of the animal's body. 

2.1.4 Stepped Pressure Pulse Effects 

Variation in pressure time history introduced by a 
complex structural environment may result in wide deviations in 
probability of kill for persons. The reflection and diffusion 
of shock, waves so that the peak overpressure is reached gradu¬ 
ally in a series of steps or pulses can appreciably change the 
LD50 point from that of instantaneous onset. Specifically, the 
latter probability of mortality is altered when the overpressure 
onset is gradual, stepped, or instantaneous preceded by a grad¬ 
ual pressure increased. 

Tests were conducted on dogs (Ref. 4) using gradual 
pressure onsets to 170 psi over 30 to 150 msec (rate of rise 
restricted to 4,000 psi/sec). The results are shown in Fig. 2. 

No dogs died as a result of these tests. This is a large de¬ 
crease in mortality compared to the 47.8 psi LD50 of Table 1. 
Applying this to the human range, it is expected that if the 
pressure rise is gradual the LD50 pressure of people will be 
significantly increased over that shown in Fig. 1 and Table 1. 

The dog lung pathology shows that pulmonary hemorrhage occurred 
at the higher pressure levels. This correlates with the results 
of previous tests with lethal doses of overpressure in which 
pulmonary hemorrhage was identified as the mechanism of death. 

More quantitative results are shown in Fig. 3 which 
shows mouse LD50 for 1 hr mortality with different preblast 
initial pressures (Ref. 5). In this case the mice were initially 
subjected to gradually increased pressure, held at that pressure 
2 min, and then subjected to an instantaneous increase. Two re¬ 
gression lines are sho’wn: (1) for the case of mice held at pre¬ 
pressure for 1 hr after the blast; and (2) for that of mice 
dropped back to ambient after the instantaneous pressure rise. 
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Fig. 2 EFFECTS OF FONG DURATION OVERPRESSl’RF. APPLIED AT DIFFERENT RATES ON DOCS 
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Neither case is a precise simulation of the nuclear weapon 
produced blast environment. 

The first case allows the mouse to recover in a pres¬ 
sured environment which may aid recovery; the second subjects 
the mouse to an unnatural drop from a pressured state to which 
he has had 2 min to adjust (refer to Fig. 3). 

The weapon produced blast onset would be more of an in¬ 
stantaneous one, even within a shelter. Therefore, embolism 
(the bends) as a result of the ensuing decompression would be 
less likely than for Case II. (The regression in Case I of 
Fig. 3 will be used below for stepped pressure pulses to calcu¬ 
late maximum possible adjustment to initial steps of blast waves.) 
Case I in Fig. 3 is representative of the effect of different 
ambient pressures because the pressure is held at a preset value 
before and after the blast. Using the LD50 regression equation 
in Fig. 3, the effect of different ambient pressures on human 
LD50 rates can be estimated. Taking the value of human LD50 
from Fig. 1 and Table 1, and applying the regression equation 
for Case I, the LD50 for a 70 kg human is found to be 75 psi 
at 14.7 psi ambient pressure. From Ref. 5, 

log(LD50, psi) = 0.590 + 0.842 log(ambient pressure, 
psi) . 

For human LD50 = 63.2 at 12 psi, we get 

log(LD50) = log63.2 + 0.842(log(14.7) - log(12.0)) 

= 1.801 + 0.842(0.088) = 1.875. 

Thus LD50 = 75.0 at 14.7 psi ambient pressure. 

2.1.5 Probability of Mortality by Instantaneous Blast 

The slope for log dose response to overpressure on a 
probit scale for percent mortality varies in the experiments re¬ 
viewed from 13.0 to 30.0 for small experimental animals. The 
slope in this case is that of a straight line as a probit scale 
through the experimental points establishing the relationship 
between the dose (in this case instantaneous pressure) and the 
response percent mortality. The homogeneity of these test 
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animals compared with the heterogeneity of the human population 
would suggest that a broader difference (from 1 to 99 percent 
mortality) i.e., less slope, would be expected tor bumans. A 
slope of 8.0 was chosen to represent the human relation. This 
establishes the rate of change of the mortality for humans to 
overpressure. Figure 4 illustrates this estimated mortality by 
blast with instantaneous onset as a function of the peak over¬ 
pressure for 14.7 psi ambient pressure. 

2.2 MORTALITY AS A FUNCTION OF TIME 

Probit analyses for guinea pig mortality at 1 hr, 2 hr, 
24 hr and 30 days were given in Ref. 3. Human LD50 is taken 
proportionally to these values as shown in Table 2. Figure 5 
shows the resultant probit curves for mortality for various 
times after exposure. The experimental guinea pig curves are 
shown for convenient comparison. 

Table 2 

LD50 AS A FUNCTION OF TIME AFTER EXPOSURE TO BLAST 


Time After Exposure 

Guinea Pig LD50* 
(psi) 

Human LD50 
(psi) 

1 hr 

40.3 

83.5** 

2 hr 

39.2 

81.2** 

24 hr 

36.2 

75.0 

30 day 

34.3 

71.1** 


** These values are derived proportionally to guinea pig 


mortality relative to the 75.0 psi peak overpressure which 
was the 24 hr LD50 derived for man. That is 


Human LD50(24 hr) _ 75.0 Human LP50(1 h r) 83.5 
Guinea Pig LD5G(24 hr) 36.2 Guinea Pig LD50 (1 hr J " 50.”3 
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Percent Mortality 





Table 3 showing cumulative percent mortality is taken 
from the graph showing mortality as a function of time. This 
tabic illustrates that time to death changes radically with 
level of blast exposure. It should be emphasized that cumula¬ 
tive mortality over all levels of exposure is irrelant and mis¬ 
leading. Those further away from the canter of the blast and 
thus expose to lower overpressures can be expected to take longer 
to die and thus may possibly be treated. Death requiring 24 hr 
may be averted by treatment such as bed rest which is not 
available to laboratory animals. However data on hospital treat¬ 
ment of blast injury is not available. 

Table 3 

CUMULATIVE PERCENT MORTALITY 
(For Humans at 14.7 Ambient Pressure) 


Blast 

Overpressure 

(psi) 


Time After Exposure 


1 hr 

THr 


30 days 

40 

0.5 

0.7 

1.4 

2.4 

50 

4.0 

5.0 

8.0 

12.0 

60 

13.0 

15.0 

23.0 

28.0 

70 

27.0 

31..0 

42.0 

49,0 

80 

45.0 

49,0 

60.0 

67.0 

100 

74.0 

77.0 

85.0 

89.0 

120 

90.0 

92.0 

95.0 

97.0 

150 

38.0 

98.3 

99.2 

99.5 

2.3 SUMMARY OF 

PRIMARY BLAST 



Animal body weight was related 

to the level 

of mortality. 

Specie to specie 

variation 

was rather 

large compared to the ex- 

perimental error 

estimate within each 

specie tested. Extrapola- 

tion of these results to 70 

kg mammal 

s gave 63-64 

psi as the 


point for 50 percent mortality. Extrapolation was made on the 

basis of a linear dimension scale and the result was adjusted 
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to correspond to sea level ambinet air pressure. The pressure 
rise in a shelter space will occur increments (depending on the 

Size of the nnpm'no^ at Hmps Annal tr> the rmiorKoi-ahi'm ti m e 

» ‘ A ---- “ 

of the room. When the "gradual" rise is included, the LD50 
value Is raised to 75 psi. It is recognized that the occupant 
may be exposed to reflected pressure greater than the incident 
but this will occur near walls. This phenomena is neglected 
but could be included in the model when reliable experimental 
data became available. It should be noted that since the LD50 
corresponds to the 62-64 psi overpressure point, it may be 
concluded that primary blast is not important in that other 
casualty mechanisms will take effect before blast. 

Duration of the pressure pulse is not a significant 
variable in the study of survival of humans in a multimegaton 
weapon environment. The orientation of the animal has not been 
shown to be important where the form of the wave is not af¬ 
fected by the animal's position. 

The estimates for instantaneous onset for 30 day (total) 
mortality from Table 3 were used to generate Fig. 6. Time to 
death (Fig. 7) was handled in a way that shows how different 
distributions of time to death occur at different levels of 
overpressure. 

Figure 7 was also obtained from Table 3 by forming the 
ratio of the difference in mortality between specific time in¬ 
tervals at a specific pressure level and the total mortality 
for that same pressure level. F?.gures 6 and 7 are used in the 
computer code with the overpressure to determine primary blast 
mortality as a function of time. 

2.4 DEBRIS EFFECTS 

Blast generated debris from buildings, furniture, etc., 
will be accelerated by the blast winds and may cause casualties 
to people within the path of the debris. This subsection is 
concerned with relating the effect of debris size and impact 

11 T RESEARCH INSTITUTE 


18 





2* jrp^ir^rfT.'TtT 



KILL PROBABILITY FROM PRIMARY BLAST 










•‘.Witr 



'0 DEATH FROM PRIMARY BLAST 











velocity (within a range of body regions) to mortality and in¬ 
jury. The actual impact velocity, or debris velocity displace¬ 
ment history is estimated and described in Section III. 

The effects of missiles on biological tissues were re¬ 
viewed using available experimental evidence and including 
superficial, incapacitating, and near lethal categories of in¬ 
jury, Missiles consisted of glass, bullets, balls, and blunt 
objects. The parts of the body used were: skin, lower abdomen, 
thorax, limbs, and skull. 

Unfortunately, very little information was available re¬ 
lating specifically to mortality. Consequently, many judgments 
were made, rendering the results qualitative. It is the 
author's opinion that a logical means of relating missile mass 
velocity and mortality has been proposed. The task for future 
experimenters will be to gather the types of data required for 
casualty estimating. The method devised to integrate evidence 
concerning effects under differing conditions and make possible 
extensive extrapolation and interpolation of experimental re¬ 
sults was to develop dose functions consisting of mass M and 

2 

velocity V of missiles. Momentum MV, energy MV , and energy 
times velocity square Mv\ depending upon the mechanism of in¬ 
jury were assigned as the dose functions. The three functions 
applied to injuries were primarily in the nature of: (1) impulse 
loading for momentum; (2) crushing or tearing for energy; and 
(3) cutting or penetrating for energy times velocity square. 

This method makes possible digital computation of probable 
biological effects in a diverse missile environment interrelating 
the various kinds of experimental evidence available. The 
values estimated anc formulas proposed may serve as a hypothesis 
for further experimental validation Application of these 
formulas will reveal which mechanism of injury and missile en¬ 
vironments are of greatest importance. How critical the assump¬ 
tions may be can be revealed by variations of the parameters. 
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2.4.1 Discussion 


Four groups of data based upon experiments were considered: 
penetration of the lower abdomen of dogs by glass (Ref, 8), ef¬ 
fects of missiles on human cadavers (Ref. 9), data on skull 
fracture (Ref, 10), and effects of missile impact on the chest 
(Ref. 11). There were considerable differences in the scope 
of these data groups and in the availability of raw observations 
for Independent estimations of parameters. The probability of 
penetration or laceration by glass was related to the mass and 
velocity of the missile by Mv\ This statistic was then used 
to attempt to consistently accouiit for other biological effects 
of missiles regarding injuries which primarily involve pene¬ 
trating wounds. Some results using larger missiles with bio¬ 
logical effects primarily involving bones did not fit this 
pattern. Especially the data on skull fracture proved the 
necessity of another statistic. Mass times velocity square, 
satisfied the requirements to explain crushing or tearing 
wounds such as most bone injuries or passage through regions of 
tissue. These injuries could be incurred with or without 
penetration of intervening tissues as in the case of skull frac¬ 
ture, bone breakage, or rib fracture complicated by internal 
lacerations. When the tissue has been penetrated, energy is 
the determining factor for estimating the probability of com¬ 
plete passage through a limb. It was found that even these two 
statistics did not correlated well for unilateral lung hemorrhage 
and simple rib fractures. It appeared from the data available 
that mass times velocity alone could be used to predict the 
occurrence of these injuries. 

The data and the resultant mass, velocity, and probability 
of each effect occurring are provided in Appendix V. It is 
again called to the attention of the reader that the values 
shown are indications of levels of injury and not mortality. 
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Table 4 summarizes the mass-velocity relationships ob¬ 
tained for the data from Appendix V. The dose relationship col¬ 
umn indicates the criteria employed to relate biological response 


with missile characteristics at the time of impact. The last 


three columns in Table 4 present the value of the missile- 
velocity dose for 10, 50 and 90 percent probability of the 
specific effect occurring. For optimistic and pessimistic 
estimates of the 50 percent probability values indicated in 
Table 4, 70 and 140 percent of the values provided are sug¬ 
gested, based on the uncertainty of the data for the MV^ doses, 

o 

and 80 and 125 percent for the MV and MV doses. Different 
probability values can be determined from Table 4 by the fol¬ 
lowing relation 


2 , ( I ° s P90 - 6 . l° g L . P . 50 , ) 2 


P i {*} - 


JL_ 

2rr S 


J 

“ CO 


X 

e -(t-logP(50) 2 /2S 2 )dt 


where is the probability of the effect occurring. 

Figure 8 is a graph of 50 percent probability thresholds 
for each effect in Table 4. The curves of Fig. 8 are obtained 
by applying the specific relationship of Table 4 between M and 
V to obtain the 50 percent probability of the effect occurring. 
For example, for rib fracture (MV relationship') the 50 percent 
probability is 31 x 10 gm ft/sec. Therefore, for a 1,000 gm 
mass, the missile velocity must be about 31 fps for 50 percent 
probability of rib fracture. If the mass of the missile is 
100 gm, the velocity must be 310 fps. In a similar manner, the 
50 percent values of the other effects at various velocities 
and ranges were determined. 
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Table 5 provides an estimate of total body projected 
areas, as we 11 as vulnerable areas of uuiiuuu body regions. 

This data will be useful at a later date when complete con¬ 
sideration of debris areas and characteristics and body areas 

— * 

are used in making casualty descriptions. However, for this 
report it was used in making qualitative estimates of mor¬ 
tality based on the injuries reported in the data of Appendix 
V and summarized in Table 4. Of course the type and size of 
missiles has a definite effect on vulnerable areas. Future 
research on missile casualties might consider some of these * 

effects when reporting data. _ 


Table 5 

BODY TARGET AND VliLNERABLE AREAS (REF. 6 AND 7) 


Region 

Area °L c 
ft 2 

if Total 

Vulnerable Area 

Area 7o of Region 7» of Body 


Head and Neck 

0.5 

12 

0,15 

30 

3.5 


Thorax 

0.67 

16 

0.65 

97 

15,5 


Abdomen 

0.46 

11 

0.45 

97 

10.5 


Upper Limbs 

0.92 

22 

0,19 

20 

4.5 


Lower Limbs 

1.65 

39 

0.38 

23 

9.0 


Kneeling presents approx. 

557 0 of field projected area 



Sidewise presents approx. 

45-50% of field 

projected area 


End of prone presents 257. 

of field 

projected area. 



2.4.2 Probability of Mortality and 

Time to 

Death 




Only limited data were available concerning mortality and 
time to death relative to mass and velocity of missiles. To 
make use of the injury data which were available, estimates of 
mortality based on severity of the wound were made. In addi¬ 
tion, time to death based on the mortality probability was 
estimated. These estimates are judgements of the scientists 
involved in the study, and are based upon general considerations 
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of the types of injuries and estimation of the environment which 
might be available for recovery. They are shown in Table 6. 

2,4.3 Incorporating Mass-Velocity Relations 

The goal of this study was to isolate casualty criteria 
which could be used to analyze the effectiveness of shelters. 

A series of functions have been developed relating missile 
characteristics to probability of injury. The severity of in¬ 
juries and associated probability of mortality based on severity 
have also been estimated. However, even at this stage func¬ 
tions are of limited value. Therefore, the effects of severity 
and probability of occurrence for each effect have been com¬ 
bined, averaged and extrapolated as necessary to obtain one 
continuous relationship covering the complete range of missile 
masses and velocities which might be of interest where data were 
available. For example, in Case 1 of Table 4 the effect of 
penetrating glass is classified as a superficial wound, these 
are estimated at 10 percent mortality. The probability of a 
glass fragment missile mass-velocity combination producing 
mortality can subsequently be determined by multiplying the 
probability of its producing the effect by the mortality 
probability. If the probability of producing a superficial 
wound is 10 percent, then the probability of producing mor¬ 
tality from the same missile mass-velocity combination is only 
1 percent. In a similar manner, each of the effect relation¬ 
ships was changed to mortality and plotted on one graph for 
each applicable body region (head, thorax, abdomen and limbs). 
Those relations marked "general" were applied to each graph, 
while those indicated for a specific region were only used when 
that region applied. An example of the former is the category 
of skin laceration, which can be used for each region. Three 
graphs resulted similar to Fig. 8 with almost as many lines. 
Effects requiring the least velocity were selected in each 
mass region, and then various relations were averaged visually 
(at this point it hardly seemed worth the effort to do more). 
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Table 6 


ESTIMATES OF PROBABILITY OF MORTALITY AND TIME TO DEATH 


Severity 

Representing 

fo 1 -l f-M DdFo 
i'ivy *, *~«~* ■*. a. fc-j i 

percent 

Superficial 

Glass and other 
lacerations 

Unilateral lung 
hemorrhage 

Rib fractures 

10 

Incapacitating 

Glass and other missile 
penetrations 

Bone abrasions and 
cracking 

Internal lacerations 
from fractured ribs 

30 

Near Lethal 

Bilateral hemorrhage 

Skull fracture 

Passage through abdomen 
or other lethal areas 

Fractures large bones 

70 

Lethal 

Fatality within 1 hr 

100 


Probability of Mortality 
percent 

Time to Death 

0 - 

10.0 

1 mo 


50.0 

1 wk 


90.0 

1 day 

90.1 - 

100.0 

1 hr 


2B 












Three sets of curves emerged, one (each) for MV, MV^ and MV^, 
And separate ones for 10, 50 and 90 percent mortality prouabil- 
ity. These were made continuous by using the lowest velocity 
curves for each mass and cutting off the curves at the inter¬ 
section points. The only remaining problem was the low end of 
the velocity scale for high mass objects. It was decided that 
this point should be determined by the results of the trans¬ 
lation casualty criteria, discussed in the next section.' The 
results of these inquiries are shown in Fig. 9. 10 and 11. As 
an afterthought, the casualty criteria employed in World War II 
was plotted on each of these figures, and the similarity was 
gratifying. It is highly recommended that future research in 
the areas of casualty criteria and mortality be aimed at 
covering the full range of mass and velocity of interest, to 
civil defense problems, and further that an attempt be made to 
verify the estimates made in conducting this study. 

Figures 12, 13 and 14 represent the debris impact 
casualty criteria as it is employed in the computer code. 
Specific sizes of debris were selected and the corresponding 
impact velocity--kill probabilities were estimated from Fig. 9, 
10 and 11. 

2.5/ BLAST DISPLACEMENT 

Overall blast displacement effects for small rodents 
were available. This data did not show a significant effect 
with respect to weight. The overall mean velocity of impact 
for 50 percent lethality of small rodents was 36.4 ft/sec, and 
90 and 10 percent mortality point averages are approximately 
41 and 31 ft/sec respectively. Time to death was based on 
mortality probability, the same technique employed for debris 
impacts. 

The blast displacement data for small rodents was ex¬ 
trapolated in Ref. 1 to humans and an LD50 value of 26.2 ft/sec 
recommended. It was cautioned however that there was little 
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basis for such an extrapolation in view of the limited data. 

For this reason automobile accident data were reviewed Based 
upon fatalities in unban auto accidents 50 percent mortality 
was placed at approximately 33-8 ft/sec. While this refers to 
the velocity of the crash, not the body impact velocity, it is 
interpreted as lending support for an LD50 impact velocity 
greater than 26,2 ft/sec* The rodent data were therefore taken 
to apply to humans giving and LD50 impact velocity of 36.4 
ft/sec. This certainly is an area requiring further study. 

The injury probabilities were taken directly from 
Ref. 12 since no adequate contrary or supporting data were 
found. However the results of accidents and falls where people 
survive, and everyone has found such instances, make one ques¬ 
tion the validity of these numbers. It is because of these 
effects that a program of data gathering and tests is sug¬ 
gested to determine the actual initial impact velocities. The 
data of Fig. 15 x^ere included in the computer code for es¬ 
timating the effects of blast translation. 

2.6 THERMAL EFFECTS 

Thermal energy burns of concern for casualty con¬ 
siderations are second and third degree burns. These burns 
may be inflicted by direct exposure of the skin to radiation, 
by the reradiation of clothing heated by the thermal energy, 
or by the ignition of clothing and subsequent burning of the 
skin. 

2.6.1 Effect of Thermal Radiation on Personnel 

It is estimated that 20 to 30 percent of the fatal casu¬ 
alties of Hiroshima and Nagasaki were caused by flash burns. 
Most, if not all, of the survivors exposed in the open at 
Hiroshima, had much less than 50 percent of the body surface 
burned. Even the lightest clothing gave protection by a 
factor of 2 and in a few cases by a factor of 4, It was 
determined that thermal radiation is capable of causing skin 
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Fig. 1.5 KILL AND INJURY PROBABILITY FROM BLAST TRANSLATION 











bums and eye injuries in exposed individuals at such distances 
from the nuclear explosion that the consequences of blast and 
of the initial nuclear radiation were not significant, 

2.6.2 Burn Mortality 

Since second and third degree bums for all practical 
purposes involve infection, early therapy is essential. Clean 
second degree burns usually heal by epithelization, but if in¬ 
fection ensues, healing nay take up to 6 weeks. Healing time 
and symptomology for various burn situations is shown in Table 
7. 


Table 7 

ESTIMATED HEALING TIME AND SYMPTOMOLOGY FOR BURNS 


Degree 
of Burn 

Healing Time, 
days 

Symptomology 

1 

8 

Burning pain 24 hr, soreness and 
redness 8 days. 

2 

8-16 

(uninfected) 

Burning pain 24 hr, swelling. 


up to 42 
(infected) 

Blistering 2 to 30 hr; ooze serum 

3 to 4 days; scar (scabbing) 6 to 
10 days, aching and tenderness 8 
to 14 days. 

3 

20-30 

(uninfected 
small burns) 

Brief intense pain; swelling up 
to 2 days; blistering 24 to 36 hr, 
soreness 7 to 10 days. 


20-40 

(larger burns 
scar formation) 

Separation of destroyed skin 3 to 

4 wk; ulceration; epithelization 

4 wk. 


Many months 
(skin grafting) 

Scale formation 6 wk; plastic sur¬ 
gery required for burnt areas 

0.8 in. 
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Figure 16 from Ref. 44 illustrates the relationship in 
which the percent of total body burned is related with mor¬ 
tality based on ever 1,800 treated burr, cases. This figure 
represents the most up to date data on burn mortality. The 
effect of untreated burn cases has not been determined. How¬ 
ever, the important of treatment on mortality in the case of 
burns as well as in the other casualties is of great concern 
for civil defense purposes. Another effect not illustrated in 
Fig. 16 is the relationship between burn area, mortality and 
age as shown in Fig. 17. Figure 18 presents the relationship 
between the energy deposited on the skin and the weapon yield 
for first, second, and third degree bums. This variation oc¬ 
curs because of the relative rates of release of energy by 
various size weapons. Large weapons require more energy to be 
delivered to cause the equivalent burn because the delivery rate 
is lower. Small weapons release energy over a short period of 
time and have a higher delivery rate, thus requiring less total 
energy to affect the same injury. 

2.6.3 Determining Bum Areas 

Thermal radiation from a nuclear explosion, like ordin¬ 
ary light, can be shielded by opaque material placed between a 
given object and the fireball. The opaque material will absorb 
the energy and act as a shield providing protection from thermal 
radiation, unless reradiation or ignition occur. Transparent 
materials such as glass allow some thermal radiation to pass 
through. 

Some of the most extensive and destructive bums result 
from burning clothing; such bums are usually deep and circum¬ 
ferential in extent. Reflectance and transmittance generally 
play a more important role than the absorption which ultimately 
leads to ignition. Obviously, dark materials with a low igni¬ 
tion temperature are hazardous during nuclear attack. Trans¬ 
mittance depends both on the color and weight of the fabric. 
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Fig. 16 BURN MORTALITY 
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Fig. 17 MORTALITY FOR DIFFERENT AGES AND BURN AREAS 
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Weapon Yield 

Fig. 18 THRESHOLD EXPOSURES FOR HUMANS EXPOSED TO WHOLE 
THERMAL PULSE (Ref. 31) 
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Table 8 relates the estimated energy to cause ignition of 
various materials. The results can be scaled to other yields. 

V*! ftHVD 1 O 1 1 1 Itchv^f OO .‘-Vi V <Ci 1 ohl eUl* rt K /-» *-»*-* f- V. /-\ V» -»*m o 1 

£p ^ ■** »-*• •-» *-*■ *— ^ wvi»_ >. W.J.UWAWI* us-LwoUt cue unuruiux 

energy delivered and the percent of the skin burned for a 1 MT 
weapon. These curves were estimated from explosed skin areas, 
thermal radiation energies necessary to cause burns, and the 
thermal energies necessary to ignite clothing. The curve was 
extrapolated to 100 percent based on Hiroshima data. 


Table 3 

VALUES OF ENERGY REQUIRED FOR IGNITION OF CERTAIN MATERIALS 

FOR A 1 KT WEAPON 


Materials (Ref. 24) 

2 

(cal/cm ) 

Newspapers, dry 

2.6 

Dry, rotted wood 

3.0 

Dry deciduous leaves 

4.5 

Brown Kraft paper, dry pin needles 

5.7 

Trees, not ignited 

5,6 

Colored fabrics, not wool 

5.8 

Many combustible materials, weathered wood siding 
(new wood charred) 

8.9 

White cotton, colored wool 

11.8 

Painted (white) wood siding, charred only 

18.5 


2.6.4 Time to Death 

Figure 20 from Ref. 20 is an estimate of time to death 
based on animal tests. The figure shows the probable time to 
death as a function of the skin area burned. By no means is 
this data significant to the problem since it represents only 
one test. However, results of this type were necessary for 
completeness of the analysis. Figures 16, 19 and 20 are incor¬ 
porated in the computer code for determining mortalities, in¬ 
juries, and time to death. The area burned is determined from 
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Fig. 19 BODY AREA BURNED BY THERMAL RADIATION 














Fig. 20 TIME TO DEATH THERMAL RADIATION 










Fig. 19 and the incident energy, which is scaled to 1 MT. This 
is used with Fig. 17 and 20 to determine the probability of 
death and time to death. Any burns indicated are counted as 
injuries, therefore the number of bum injuries is the differ¬ 
ence between the number of people burned, and those dying. 

2.6.5 Eye Injury 

Results from the detonations over Japan indicate that 
eye injuries directly attributable to thermal radiation ap¬ 
peared to be relatively unimportant. There were many instances 
of temporary blindness occasionally lasting up to 2 or 3 hrs. 

In no case, among 1,400 persons examined, was the thermal 
radiation exposure of the eyes sufficient to produce permanent 
opacity of the cornea. 

Neither flash blindness nor retinal damage constitute 
major hazards during the daytime because of the restricted 
pupillary diameter which limits the amount of light entering 
the eye. Furthermore, the blink reflex, 100 to 150 msec, pro¬ 
tects the eye from undue amounts of radiation, except in those 
cases where the thermal impulse is delivered within extremely 
short times. This is the case for low yield weapons on the 
ground and for weapons of any yield exploded at very high al¬ 
titudes. Permanent eye injury would be expected only in those 
persons who were looking directly at the fireball. 

Indicated Areas of Research on Thermal Effects 

• No effort appears to have been directed to 
the evaluation of thermal damage for more 
than one weapon on target. 

• Configuration of the thermal-time pulse and 
variations due to burst height and trans¬ 
missivity of the atmosphere should be 
determined. 

• More needs to be learned about biological 
and physical effect of hot gases entering 
underground shelters. 
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• Extent of protection afforded by various 
types of clothing and shielding should be 
£ur^<^rl 

• Synergistic effects of thermal and 
radiation energies are not fully known. 

2.7 BIOLOGICAL EFFECTS OF INITIAL RADIATION 

The primary damage which causes radiation death is 
damage to the hematopoietic system which consists of the bone 
marrow, lymphatic system, and the spleen. Comparable patterns 
of hematopoietic response are shovn by small animals and man 
but the response is at an accelerated rate in the animals be¬ 
cause of their shorter life span. Each species tested, and 
possibly man, can tolerate a chronic dosage of only five times 
the acute LD50 dosage. 

Blair (Ref. 15) stated that radiation injury is 
proportional to the dose rate. A part of this injury is re¬ 
paired spontaneously at a rate proportional to the magnitude 
of injury, and an irreparable fraction is present which is 
proportional to the total accumulated dose. Death following 
an acute dose is due primarily to excessive reparable injury 
(injury for which there has not been enough time or the proper 
conditions to recover); whereas life-shortening following chronic 
radiation is due to irreparable injury. 

There is essentially no difference in effect of a given 
dose delivered over a few seconds, a few minutes or a few hours. 
However, a comparable dose delivered over several days or weeks 
would be much less effective for some effects. The lethal dose 
for a mouse given over 4 wks is five times the single acute 
dose, whereas for the dog it is only 1.5 times- However, Blair 
postulates that extrapolation to another species may be made 
on the basis of the normal median survival time for that 
species. 
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2,7.1 General Effects of Radiation Doses on Humans 


As with biological effects, the shape of the mortality 
versus dose curve is not know for man. Reliable information on 
man has been obtained for radiation doses up to 200 rem, As 
the dose increases from 200 to 600 rem, available data from 
exposed humans decreases rapidly and must be supplemented more 
and more by extrapolations based on animal studies. However, 
the conclusions drawn can be accepted with a reasonable degree 
of confidence. Beyond 600 rem, relationships between dose and 
biological effects on man must be translated almost entirely 
from observations made on animals exposed to ionizing radia¬ 
tions. Figure 21 presents representative quantitative values 
postulated for humans (Ref. 18), 

The effect of nuclear radiation on living organisms 
depends not only on the total absorbed dose ^>ut also on the 
rate of absorption and on the region and extent of the body 
exposed. Different portions of the body show different sensi¬ 
tivities to ionizing radiations, also, there are variations in 
degree of sensitivity among individuals. In general, the most 
radiosensitive parts include the lymphoid tissue, bone marrow, 
spleen, organs of reproduction, and gastrointestinal tract. 

Gerstner (Ref. 16) notes that in the dose range from 
150 to 200 rem the acute radiation syndrome becomes noticeable 
in the majority of an exposed population, and it may reach 
clinical significance in a few highly radiosensitive persons. 
Approximately 200 rem will be the clinical tolerance dose, or 
the threshold dose, beyond which an appreciable number of per¬ 
sons can be expected to develop significant complications re¬ 
quiring hospitalization and intensive medical treatment. At 
these levels the physical fitness and work capacity of the 
patient will return to normal about three to four months fol¬ 
lowing exposure. Up to about 500 rem the clinical course of the 
acute radiation syndrome is largely determined by radiation 
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Fig. 21 ESTIMATED EFFECTS OF IRRADIATION 
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effects on the lymphoid tissue and the bone marrow. At doses 
greatsr than 500 rem, direct radiation damao-o i-n rhe enithelium 
of the gastrointestinal mucosa becomes a decisive factor. Thus, 
in a'wide dose range (up to 500 rem) those individuals who sur¬ 
vive can overcome the acute radiation syndrome and return to a 
useful life. With doses larger than 700 rem, death usually 
occurs in a few hours to a week. Table 9 illustrates the pre¬ 
dicted clinical course for humans exposed to acute dosages of 
penetrating radiation. In general a median lethal dose of 450 
rem is postulated for man. The 39 percent fatalities given for 
a dose of 400 to 500 rem would appear to be low in light of 
subsequent information. 

Another study (Ref. 17) provided related data based on 
the assumption that human populations behave in the same way 
as animal populations, and the fatality versus dose curve is a 
normal distribution with a standard deviation of about 20 per¬ 
cent of the I.D50 value. With 500 rem as the LD50 dose, the 
standard deviation is then 100 rem. The percent fatalities 
versus dose curve in this case is shown in Fig, 22. The time 
to death and incapacitating illness curves are shown in Fig. 

23 from Ref. 15. These two cases represent the data employed 
in the computer simulation. Actually, the LD50 for man still 
is a matter of speculation and the estimates made in Fig, 22 
must be regarded as tentative. However, the radiation casualty 
criterion constitutes one of the better defined criteria in the 
author's opinion, 

2.7.2 Effects of Acute Radiation Poses 

Table 10 (Ref. 15) is presented as the best available 
summary of the effects of various whole-body dose ranges of 
ionizing radiation on human beings. Below 100 rem, the response 
is almost subclinical, although changes may be occurring in the 
blood. Between 100 and 1,000 rem is the range in which therapy 
will be successful at the lower end and may be successful at the 

upper end. The earliest symptoms of radiation injury are nausea 
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Table 10 

SUMMARY OF CLINICAL EFFECTS OF ACUTE IONIZING RADIATION DOSES (Ref. 16) 
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and vomiting accompanied by discomfort, loss of appetite, and 
fatigue. The most significant effect is on the hematopoietic 
tissue. An important manifestation of the changes in the func¬ 
tioning of these organs is leukopenia, that is, a decline in 
the number of luekocytes (white blood cells). Beyond 1,000 rem, 
the prospects of recovery are so poor that therapy may be re¬ 
stricted largely to palliative measures. In the range from 
1,000 to approximately 5,000 rem, the pathological changes are 
most marked in the gastrointestinal tract; above 5,000 rem it 
is the central nervous system which exhibits the major injury., 

Individuals exposed in the lethal range can be divided 
according to symptoms and signs into groups having different 
prognosis. These may be condensed into three groups in which 
survival is, respectively, probable, possible, and improbable 
(Ref. 18). 

Group 1 - Survival Probable 

This group consists of individuals who may or may not 
have had fleeting nausea and vomiting on the day of exposure. 
There is no further evidence of effects of exposure except for 
hematologic changes. The lumphocytes reach low levels early, 
within 48 hr, and may show little evidence of recovery for 
many months afer exposure. The granulocytes may show some de¬ 
pression during the second and third week. Platelet counts 
reach the lowest level on approximately the 30th day, at the 
time when maximum bleeding was observed following the Japanese 
explosions. It is well known that all defenses against infec¬ 
tion are lowered even by sublethal doses of radiation and thus, 
patients with severe hematological depression should be kept 
under close observation and administered appropriate therapy 
as indicated. 
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Group 2 - Survival Possible 


Vomiting may occur early but will Hp nf short duration 
followed by a period of well-being. However, marked changes 
are taking place in the hemopoietic tissues. Lymphocytes are 
profoundly depressed within hours and remain so for months. 

Signs of infection may be seen when the total neutrophile count 
has reached virtually zero (7 to 9 days). The platelet cound 
may reach very low levels after 2 wk. External evidence of 
bleeding may occur within 2 to 4 wk. In the higher exposure 
groups of this category the latent period lasts from 1 to 3 
wk with little evidence of injuries other than slight fatigue. 

At the termination of the latent period, the patient may 
develop purpura, epilation, oral and eutaneous lesions, infec¬ 
tions of wounds or bums, diarrhea, and melena. The mortality 
will be significant. W M- therapy the survival time can be 
expected to b 3 " <1 

Group 3 - Sur v ival mpr opai ! 

If vomiting occurs promptly or within a few hours and 
continues and is followed in rapid succession by prostration, 
diarrhea, anoreria, fever, the prognosis is grave; death will 
almost definitely occur in 100 percent of the individuals with¬ 
in 1 wk. There is no known therapy for these individuals, 

2.7.3 Special Shielding Considerations 

Shielding of the spleen has been found to afford 
protection against radiation. The LD50 for mice exposed to 
total body X-radiation with lead shielded spleen is nearly twice 
that for mice with spleen exposed (Ref. 19 ). The data shown 
in Table 11 emphasizes the importance of shielding as a pro¬ 
tective measure. Data obtained subsequent to that shown in the 
table indicates that with the spleen protected, about 78 per¬ 
cent of the mice exposed to 1,025 rem survived. 
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Table 11 


INCREASED RADIATION TOLERANCE BY 
LEAD SHIELDING OF THE SPLEEN 


Dosage 

(rem) 

Spleen 

Shielded 

Number 
of Mice 

Number 

of Survivors 

Survivors 

(percent) 

700 

Yes 

27 

26 

96.3 


No 

11 

0 

0.0 

900 

Yes 

60 

41 

68.3 


No 

44 

3 

6.8 


2.8 COMBINED EFFECTS 

An examination of the comparative weapons effects data 
confirms that it is not possible to realistically dissociate 
the integrated input effects for other than empirical con¬ 
siderations. However, for purposes of studying combined ef¬ 
fects a situation can be conceived in which no single type 
injury is lethal or seriously incapacitating, but where a com¬ 
bination of two or more may be so, or where survival probability 
is reduced because of an exposure to two or more effects. Com¬ 
bined ionizing radiation effects are particularly important 
because those exposed to fallout radiation may have many types 
of injuries. In addition, combined thermal-ionizing radiation 
effects are of particular interest because of the wide range 
of thermal radiation and burn injuries which might be 
experienced. 

Alpen (Ref. 20) reported that for each level of X-irradia- 
tion the death rate is higher when a burn is also applied. 
Conversely, for every burn level studied, mortality increased 
with increasing X-irradiation. He concluded: 

1. Thermal trauma increased the lethality 
of the ionizing radiation. 
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2. The protective devices of animals against 
infection are so depressed by irradiation 
that the animal is unable to cope with the 
infectious processes arising as a result 
of the burn. 

3. Combined trauma may unmask or accentuate 
lesions which, although present in the 
animal receiving either bum or X-irradiation 
alone, are usually of less consequence. 

Valerlote and Baker (Ref. 21) working with rats found 
that a primary "shock" from thermal trauma potentiates the 
effect of X-irradiation. One series of rats were given 
second degree burns from which 100 percnet survival was ob¬ 
served for the first 30 days after trauma. Another series were 
exposed to 650 rem and 700 rem X-irradiation from which 94 
percent survival was noted by 8 days following irradiation. 

The most significant increase in mortality occurred when the 
thermal trauma was superimposed on the series that received 
700 rem of X-irradiation. A decrease in survival from 94 to 
approximately 40 percent was obtained in the 0 to 8 days period 
after combined injury. This period coincides with injury to 
the gastrointestinal tract. During days 8 to 20, which is the 
"bone marrow" phase of radiant injury, superposition of the 
thermal trauma on X-irradiation was found not to produce any 
statistically significant decrease in survival. A slight in¬ 
crease in mortality was found between days 20 to 30. This 
effect was attributed to infection of the animals from the 
bum area where a marked sepsis was seen to occur. 

In all the X-irradiation groups, exposure to increasing 
severity of bum trauma resulted in increased mortality. Anti¬ 
biotic therapy was found to be ineffective in combating the 
synergistic effect of combined burn and X-irradiation injury. 


I IT RESEARCH INSTITUTE 


58 






Bond (Ref. 22) reported a synergistic effect between a 
pulmonary infection and X-irradiation, An otherwise nonlethal 
pulmonary infection combined with doses of X-irradiation pro¬ 
duced a markedly increased incidence of the pulmonary disease 
and a sharply increased mortality rate above that expected from 
the radiation alone. Working on the combined effect of burns 
and X-irradiation, Bond reported that 31 to 35 percent burns 
combined with the radiation levels shown in Table 12 increased 
mortality. 


Table 12 

EFFECT OF COMBINED BURNS AND X-IRRADIATION 
(31 to 35 percent burns) 


X-Irradiation 

(rem) 

Mortality 

(percent) 

0 

50 

100 

65 

250 

100 


When 16 to 30 percent burns, which are not normally 
lethal, were combined with 500 rem X-irradiation, mortality was 
75 percent. Since 500 rem exceeds the LD50 value (450 rem) and 
therefore may be itself cause about 60 to 65 percnet mortality, 
the specific increase due to combined thermal (16 to 20 percent) 
and 500 rem X-irradiation is apparently about 10 to 15 percent. 

Figure 24 relates the data reported herein on thermal 
and radiation effects. This effect has not been incorporated 
in the computer code. The entire relation between radiation, 
thermal, and blast injuries requires further investigation. In 
particular, the relation between ionizing radiation and each 
other effect should be examined because of the fallout environ¬ 
ment which may exist after an attack, as well as the effect of 
a multiple attack, 
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SECTION III 
MODEL DESCRIPTION 

This section describes the various models developed for 
the overall computer simulation of casualties resulting from 
the initial effects of a nuclear detonation. The specific 
casualty mechanisms included in this model were: 

(1) Primary Blast, 

(2) Blast Translation, 

(3) Debris, 

(4) Thermal Radiation, and 

(5) Initial Ionizing Radiation. 

This first attempt at a model specifically excludes other 
important casualty mechanisms such as: 

(1) Fallout Radiation, 

(2) Fire, and 

(3) Ground Shock, 

and also indirectly excludes such important effects as scat¬ 
tering effects of gamma and neutron radiation and being "buried 
alive" by debris. The model also is only operative in the mach 
region inasmuch as only horizontal blast loading of people 
and structures are considered. 

It was the overall intention in developing this model to 
provide a modular framework which could be easily updated when 
appropriate additions and changes were warranted. It may be 
noted that where parts of the model were uncertain provision 
has been provided to treat these parts parametrically. For 
example, in evaluating casualties from debris, the model 
requires a mix of particle sizes. Here, one can get into the 
problem of predicting structural collapse mechanisms and the 
fragmentation of frangible plates. Instead of letting the 
model compute these mixes directly, the mix is specified 
parametrically by particle size distribution or more generally 
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by acceleration coefficient. There are, however, two areas 
in which the model utilizes questionable techniques and as¬ 
sumptions in order to deal with problems which are the subject 
of current research. These areas are in describing the geometry 
of the shelter system and the interaction of the blast wave with 
that geometry and also within a specific shelter. Although 
special techniques, which will be described below, were devel¬ 
oped to treat both these areas in an analytic fashion, they 
could also be treated parametrically as input data as discussed 
above. 

Detailed description of the casualty criteria and the 
way it was developed for each casualty mechanism was provided 
in the previous section of this report. 

3.1 CHARACTERISTICS OF NODE GEOMETRY 

Host of the casualty mechanisms which develop on the 
exterior of structures are highly dependent on geometric 
properties associated with the structure's length, width, height, 
spacing between contiguous structures and the orientation of 
the structure to ground zero. A general representation of the 
typical node geometry is illustrated in Figure 25 , A particular 
structure located at the node is considered to have three struc¬ 
tures contiguous to it. This results, in general, in affecting 
five particular ground areas with respect to the reference 
structure where personnel may be present. In special instances, 
which deviate from the general representation, these five areas 
may be both inconsistent and inapplicable. These special cases 
may best be shown by developing expressions for each of the 
five regular areas. These are: 

cot <p) 

1/2 S o S 0 cot cp 

2 2 ( 1 ) 
cot cp- S2) 

1/2 S£ tan cp 
S 2 tan cp) 
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and S 2 are Spaces between Buildings 


To Ground Zero 



Areas used in 
Calculating 
Survival of Persons 
Outdoors 


Fig. 25 NORMAL NODE GEOMETRY 





where and S 2 are distances between structures as shown in 
Figure 25 and <ti i £ rhp And p n£ firoir. rsfsrsr.cs to 

ground zero, l and w are structural dimensions. Corresponding 
distances associated with the areas are: 


D, « S^/sin cp 
D2 = + S2/COS <p 




When cp - 0 or 7t/2 7 the five areas degenerate into a two 
area representation consisting only of the area of the two 
streets. These two areas are simply 

A x = S L S 2 + 2 SjJ 

( 2 ) 

Aj 13 2 w 

When 0< 9 <; 7 t/ 2 , the area representation is developed dif¬ 
ferently for each of the appropriate casualty mechanisms (i,e,, 
translation, debris, thermal radiation and ionization radiation) 

Equation (2) is utilized directly in cases of translation 
and ionizing radiation with no regard to the angle of incidence, 
cp. The rationale here is that these effects are not influenced 
substantia]ly by the angle of incidence because they take place 
over the entire exterior area. Exterior debris } however, is 
highly dependent upon the angle of incidence with the structure 
generating debris. Exterior debris is distributed over the 
area shown in figure 26, This area is only a part of the en¬ 
tire exterior area which consists of the sum of the two areas 
of Equation (2). Thermal radiation is represented by a propor¬ 
tion of each of the two areas. This proportion is dependent 
on the shading which a neighboring structure affords another 
structure. Equations (3) below outline the altered Equation (2) 


IIT RESEARCH INSTITUTE 


64 













-s 2 -«*| 





OUTSIDE DEBRIS 









where 

D x - (21 + S 2 )/?. 

D 2 = (2w + S 1 )/2 

T,w « average length and width of a particular class 
of structures at the node 
* H x 

D = D, - ——- sin cp 

ob 

and K v 

** n x n 

D = Dp + S. - — cos cp 

1 ob 

where 

h = the height of the structure 

h o p ) = the height of burst 

x o - the distance from ground zero 
32 WEAPON EFFECTS 

The purpose of the weapon model is to provide the free 
field weapon effects which occur as a function of weapon yield, 
height of burst, distance from ground zero and in the case of 
thermal energy, visibility. Weapon effects parameters which 
are predicted include peak incident overpressure, positive 
phase duration, time of arrival of the blast wave, thermal 
energy, and the radiation dose due to the presence of initial 
gamma rays and neutron flux. In addition to these parameters, 
other blast parameters are developed utilizing the Rankine- 
Hugoniot relationships. These include peak dynamic overpres¬ 
sure, peak particle velocity, and the shock velocity. The ap¬ 
proach in developing the weapon effects parameters is to 
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utilize Effects of Nuclear Weapons (ENW) (Ref. 15) data as 
much as possible. However, other sources are utilized where 
applicable. The computer code, which employs this model, has 
been developed on a modular principle allowing for ease of up¬ 
dating weapon effects prediction. 

Figure 27 illustrates the overpressure-height of burst- 
range relationship for a 1 KT burst (Ref. 15). Figures 28 and 
29 illustrate a similar relationship for positive phase dura¬ 
tion and arrival time respectively for a 1 KT weapon. The cube 
root scaling law makes these curves applicable to higher yield 
weapons. A linear interpolation scheme was utilized in obtain¬ 
ing intermediate values from these contour curves. 

Development and usage of this interpolative routine is 
diagrammed in Figure 30 and consists of the following steps: 

• Scaled heights of bursts and corresponding scaled 
ground ranges for 25-ft increments in h ob along 
each constant overpressure curve are stored in the 
interpolative program. 

To obtain peak overpressure, given scaled h ^ and 
scaled ground range - 

• Each constant overpressure curve is followed from 
h Q k = 0 upwards until the interval is found on 
each overpressure curve, which contains the 
given scaled h Q ^. 

• Linear interpolation is made within the chosen 
intervals to obtain the ground range on each 
constant overpressure curve corresponding to 
the the given scaled h ^ 

• Interpolated ground ranges corresponding to given 
scaled h ^ are read for each constant overpressure 
curve. 
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Height of Burst, ft 










Note: Dynamic pressure is given in parenthesis 

Fig. 28 POSITIVE PHASE DURATION ON THE GROUND OF OVER¬ 
PRESSURE AND DYNAMIC PRESSURE FOR 1 KT BURST 
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Height of Burst, ft Height of Burst, ft 


(a) Early Times 


Fig. 



Distance from Ground Zero, ft 


(b) Late Times 



29 ARRIVAL TIMES ON THE GROUND OF BLAST WAVE 
FOR l KT BURST 


ft 








Height of Burst 


(Programmed Interpolative Scheme for Weapon Effects Parameters) 



20 and 15 psi Based on Ground Range 

Fig. 30 IIEIGHT-OF-BURST CHART FOR PEAK OVERPRESSURE 
(High Range) 













• Overpressure interval containing given scaled 
ground range is selected. 

• Peak overpressure is finally obtained by linear 
interpolation, based on given ground range and 
interpolated ground ranges corresponding to given 
scaled h ^ on constant overpressure curves. 

The thermal energy from the weapon may be expressed in 
the following functional form: 

Q = hOUUT ( cal / cm 2) (Re£> 15) (4) 

IT 

where 

W «* weapon yield (KT) 

R = slant range (mi) 

T = transmissibility of the energy in air. 

The transmissibility factor T was expressed in functional form 
utilizing 

T - e -3.912 R/V (Ref 23 ) ( 5 ) 


where 

V = visibility (mi). 

Figure 31 illustrates how this total energy Q is delivered as 
a function of scaled time. Scaled time, in this case, is the 
ratio of the time to the second thermal peak to the actual 
delivery time. The time to the second thermal peak is approxim¬ 
ated by 

t - 0.032 W 1/2 (Ref. 15) 
max 

Utilizing Figure 31, the thermal energy may be determined as a 
function of selected discrete time intervals. This is useful 
in evaluating the effect of evasive actions on reducing the 
kill expectancy associated with initial thermal radiation. 
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Equations ( 6 ) and (7) express the dose of ionizing 
radiation in rads due tn gamma rays and the integrated nc 
flux respectively. 




3.2 W' e “ R736 ° 
15.5W e' R/21 ° 


( 6 ) 

(7) 


with 

W' = W for UWf 20 

W' = 0.614 W 1,163 for 20<W *100 

W' = 0.485 W 1,214 for 100<W£5000 

W' - 0.005 W 1,740 for 5000<W £1000 

and 

K - 1 for h . » 180 W 0 * 4 

ob — 

K = 0.67 + 0.33 h ob /(180W 0,4 ) for h ob «= 180 W 0 ’ 4 

where 



and are the gamma ray and neutron flux doses (rad) 
is the yield (KT) 


R is the slant range (yds) 


h Qb is the height of burst (ft) 

These relationships are not applicable for slant ranges below 
3600 ft and for weapon yields below 1 KT. Within the specified 
ranges, Equations ( 6 ) and (7) are piecewise linear approximations 
of the appropriate curves in Ref. 15 and have been previously 
utilized in Ref. 24 . -They also seem to conform to the rela¬ 
tionships set out by Brode (Ref. 25). 
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3.3 INTERACTION EFFECTS 


When free-field weapon parameters are developed for some 
ranap of int'prpst hot' crht- of hurst: and wpdnnn vield. the. resul ts 

U " • " ‘ ~ » «_> - • * * l — J 

must be interfaced with the structural environment that exists 
at the point of interest. This interaction of weapon parameters 
and structural environment results in a most complicated effect 
often referred to as "shielding. 11 The most important interac¬ 
tion effects include: 

• Alteration of overpressure due to close proximity 
structures. This alteration may be either positive 
or negative depending on the particular situation. 

• Alteration of overpressure within structures due 
to apertures. 

6 Reduction of thermal energy by shading caused by 
other structures and window coverings. 

• Reduction of ionizing radiation by the effects of 
surrounding structures and the material within 
the structure itself. 

3.3.1 Bl ast Casua l ties Due to the Blast Alone 

Review of the literature indicates that only a small ef¬ 
fort has been made to determine the overpressure reduction due 
to the structural shielding. At Nagaskai it was first observed 
that certain groups of buildings which were closely spaced sur¬ 
vived overpressure damage, while others of the same construc¬ 
tion and at further ranges failed. This unorthodox observation 
led to a few shock tube and HE tests (Ref. 26 and 27). Figure 
32 (from Ref. 26) illustrates how shielding and protection of 
buildings occurs. It may be observed that for a constant sepa¬ 
ration ratio the shielding effect increases with increasing 
positive phase duration. Once the separation ratio (i.e., the 
ratio of structure spacing to structure height) is determined, 
the overpressure may be reduced by the shielding factor, g g . 
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SHIELDING FACTOR VERSUS SEPARATION RATIO 
(Comparison of Wind Tunnel and Shock Tube Results) 











Addition-*! rednrr -i nns In overpressure might be due to the 
orientation of the structure to the blast but this is not con¬ 
sidered herein. 

The attenuated overpressure stemming from contiguous struc¬ 
tures may be further reduced due to apertures on the structure. 
Figure 33 illustrates the results of a shock tube study (Refs. 

28 and 29 ) of the effect of window openings on overpressure 
reduction. Summarizing, the free field overpressure p Q is first 
obtained. This is attenuated to p^ by proximity to contiguous 
buildings; p^ is further attenuated to pj^ within the structure 
due to the presence of apertures. Percent of blast casualties 
for each time to death on the outside is calculated directly by 
utilizing p^ and Figures 6 and 7. These percentages are reduced 
by the percent of people outside. In a similar manner casualties 
sustained indoors and attributed to blast effects alone are 
determined from p^ and Figures 6 and 7. These qualities are 
modified further by the percent of building type and the percent 
of population indoors. 

3.3.2 Whole Body Translation 

High velocity winds, both inside and outside of structures, 
cause persons to translate into surrounding rigid surfaces (in¬ 
cluding the ground) resulting in casualties due to the associ¬ 
ated impact. The translation, analysis considers a standing, 
sitting or lying man as a rigid body that can pivot at one point 
on the ground. Simultaneously this point can also translate 
horizontally as in a slot. The associated equations are sum¬ 
marized: (Ref. 42) 

9 = (BC-E)/(AC-D) 

( 8 ) 

x = (BD-EA)/D-AC) 


IIT RESEARCH INSTITUTE 


77 










Normalized Initial Interior Pressu: 
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Ratio of Front wall Aperture to Total 
Front Wall Area 


Fig. 33 NORMALIZED INITIAL INTERIOR PRESSURE 
'' VERSUS FRONT OPENING SIZE FOR MODELS 

WITH FRONT AND BACK OPENINGS ONLY 
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where 


A 

B 

C 

D 

E 


(F(t)- P-W)/m + r9 2 ( ucosh - sin(3) 

r cos 

J/m 

(F(t)d - Ur sin3 )/m 


where 

p, = coefficient of friction 
W = weight of the rigid body 
J = moment of inertia of the rigid body 
m = mass of the rigid body 


and 

P 

r 


cp - e(t) 


(a 2 + y 2 ) 


1/2 


F(t) = 144 hi (p f (t) - p b (t)) 
d - h /2 cosG + w sinQ 

The parameters cp, 9, a , 7, h, i, w, T, r ^ and W are as illus¬ 
trated in Figure 34. Table 13 shows the value of these param¬ 
eters used in the analysis. The pressure on the front and back 
face of the man models p^(t) and p Q (t) is illustrated in Fig¬ 
ure 35. Equations ( 8 ) are numerically integrated as a function 
of time to yield the velocity/displacement time-history for both 
rotation and translation ai: the pivot point 

To facilitate applications of the casualty criteria, and 
minimize computer running times, the distance that a body may 
translate is broken down into 10 subdivisions of a basic unit 
of length. This unit is dependent on whether translation takes 
place inside or outside On the inside, the unit of length is 
the average room length. The outside unit of length is the 
longest distance associated with the outside area of interest 
(see Subsection 3.1). As the equations are integrated one of 
three things may develop: 
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U = Shock Velocity, 1132 ft/sec 
p = peak overpressure 
p = Ambient Pressure, 14.7 psi 

t = positive phase duration 

P s = stagnation pressure 


P r = 2P (- 


7P +4p 

' o - 

■-7PO?' 


) - reflected over¬ 
pressure 


p( t) = p(-js-)e - overpressure 


q(t) - C df q (1—f-) e ~ drag ' 

o pressure 

p(t) + q{ t) t s - where S 

= min(h,w/2) - stagnation 
s. time 

w - width 

Time, t o 


(ft) Front Loading 


w + 4S 

" T 


r *-* 1 

:t) = D !!--- e 


ft o 


' < J 


q(t) - C db q[l - 2 ] C S 



p(t) + q(t) 


t“ = t - ~rr 


t = t - —rr 
o o b 


(b) Back Loading 


Fig. 35 TRANSLATION LOADING 









Table 13 

TRANSLATION PARAMETERS 


Parameter (Ref.30) 

Standing 

Sitting 

Lying 

Man Height (h), ft 

5.76 

3.0 

0.833 

Man Depth (i), ft 

1.33 

1.33 

1.33 

Man Width (w), ft 

1.0 

1.58 

5.76 

c.g. x distance (a), ft 

0.28 

0.667 

2.63 

c.g. moment of inertia (J), 
slug ft^ 

8.57 

5.32 

8.57 

c.g. Y distance (Y), ft 

3.14 

0.833 

0.55 

Buildup Coefficient* ,f 

8.0 

3.0 

2.5 

Note: Weight of Man, W, = 160 lb in all 
Coefficient of friction, p., =0.5 

**See Capabilities, Ref. 31 (Classified). 

cases. 

in all cases. 



(1) The body may translate horizontally a distance 
corresponding to a multiple of one-tenth the 
basic unit of length. 

(2) The body may rotate into the ground. 

(3) The body may neither translate nor rotate 

If case (1) applies, the velocity at each of the 10 stages is 
recorded as the body translates through each of the stages. If 
no translation or rotation occurs or if translation stops before 
translating the full unit length, the velocities corresponding 
to the remaining stages are set equal to zero. When the body 
rotates into the ground (90 deg) the total velocity (i.e., 
translation and rotation) is applied for all remaining stages. 
When the body starts from a lying position, only translational 
motion is considered. Having determined the velocity of the 
body at each stage, and the position at each stage with respect 
to a down wind rigid wall, the translation velocities are as¬ 
sumed equal to the impact velocities which can be directly 
related to mortality, injury and time to death. 
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A matrix of head velocities corresponding to each of the 
three initial body positions, (i.e., standing, sitting, lying) 
in each of the 10 subdivisions of the basic unit of length is 
transformed into a corresponding kill probability matrix by 
relating to Figure 15. An injury matrix is also formed utilizing 
Figure 15 in a similar manner. The above matrices are post- 
multiplied by a column vector of position percentages to form 
a vector of kill and injury percentages. Each element of those 
vectors corresponds to the percent of people killed and injured 
in each of the 10 subdivisions or stages of the basic unit of 
length. It remains to relate the actual areas to the basic unit 
of length. Each of the actual areas, as determined by one of 
the methods outlined in Subsection 3.1, has a representative 
unit of length associated with it. This unit of length is then 
associated with that stage of the basic unit of length which is 
nearest in size to it. The percentages killed and injured in 
that stage are then applied to the percent population in the 
actual area under consideration. The percent killed is further 
broken down by time of death as determined by the probability 
of kill in the area. 

The procedure described is applied on the outside of the 
structure and to each individual building type at the node under 
consideration. Consider, for example, the five-area outside 
geometric case developed in Figure 25. Suppose A 3 has the 
longest distance, D 3 , associated with it. Then would be 
considered the basic unit of length and divided into 10 stages. 
After the probability of kill and injury have been determined 
for each stages of D^, the percent of people killed and injured 
in A^ is discovered simply for forming the product of the ratio 
A^ to the total area (i.e., A^ + A 0 + A 3 + A^ + A^), the 
probability number, and the outside population percent. To 
find the probabilities of kill and injury in another area, say 
A^, it is laid over the basic area, A 3 , and the attributes of 
the stages which correspond to are assigned to it. This 
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might he the attributes of five stages if is half the 
length of Dj. The nroress of finding the percent killed and 
injured in when the probabilities of kill and injury are 
known is similar to that outlined for A^. 

3.3.3 Structural De bris 

The analysis to compute debris trajectories has been 
developed previously and is outlined in another report (Ref. 32 ). 
That analysis has been utilized to develop displacement-velocity- 
time relations as a function of debris characteristics and 
weapon parameters. The computation of casualties due to debris 
takes place in particular subset areas of the total area. The 
total outside debris area of interest is computed as shown in 
Figure 26. 

On the inside of a structure the area of interest depends 
on the type of interior walls. Two types of interior walls are 
assumed to exist, plaster and masonry. Plaster walls are con¬ 
sidered to have no effect on casualty production and thus only 
the outside walls of the building in this case act to cause debris 
within the structure, Plaster walls Is a term used in the 
computer code to indicate no casualty production due to debris 
from interior wall failure. Such conditions as lath and plaster, 
wood stud and other type interior walls which might produce 
casualties may he included as masonry and their actual accelera¬ 
tion coefficient entered explicitly into the code. The items 
of interest in the piaster wall case are the entire building 
area and either its width or length depending on which is the 
larger. When the building has masonry interior wa'ls there 
are two possible areas of interest depending on wall failure; 

1) the area associated with exterior room (i.e.., rooms 
adjacent to exterior walls); and 2) the area of the remain¬ 
ing inner portion of the structure. Each cf these areas has 
a characteristic length associated with it. When the interior 
masonry walls fail, they are assumed to be the only walls acting 
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nn the interior portion of the hni 1 riing- outside t.?all failure 
is assumed to act only on exterior rooms in this case. The 
following four cases of debris action are thus possible within 
a structure: 

• outside walls fail - plaster walls 

• outside walls fail - interior masonry 
walls fail 

• outside walls fail - interior masonry 
walls do not fail 

• outside walls do not fail - interior 
masonry walls fail. 

After a characteristic length is chosen, it is broken 
down into 10 subdivision (sectors) in the same manner as dis¬ 
cussed in Subsection 3.3.2 for translation. Depending upon which 
of the four assumed debris action is under consideration, 
either a masonry interior or exterior wall is considered to be 
failed at one end of the characteristic length. An investiga¬ 
tion is undertaken within each sector to determine whether 
particles from the wall can strike a man in each of three body 
positions (standing, sitting or lying) in any of three places 
on the body (head, thorax, or abdomen). This investigation is 
accomplished in the following manner. For a given sector, a 
starting distance and ending distance from the wall under con¬ 
sideration is known Also known are the displacement-velocity¬ 
time relationships for all particles assumed to make up the 
wall. There are nine possible heights considered, correspond¬ 
ing to nine combinations of body position and body region of 
damage. Gravity forces are assumed to be the only vertical 
forces acting on debris particles and thus, time of flight may 
be directly related to initial particle position on the wall 
as shown below; 

t. = V A M 16 
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where 

represents the vertical difference in 
height between the initial particle 
position on the wall and the nine im¬ 
pacted positions of interest on the body. 

t^ are time of flights corresponding to each 

Ah i . 

Consequently, given the distance bounds on a sector and average 
velocity in the sector, the initial wall height of a specific 
particle size that may pass through the sector at some height 
of interest may be determined. It may be impossible to find 
an actual wall position to exist for some size particles. If 
this is the case, it is assured that that size particle does not 
pass'through the section at the height of interest. If a 
particle size exists in a sector its lethality and injury are 
determined by using Figures 12 through 14, the particle weight, 
and average final velocity in the sector. 

It is assumed that the effect of one particle striking a 
person is independent of the effects of other particles. There¬ 
fore, only the maximum effect over all particle sizes, all body 
positions and body regions of damage is considered in each of 
the 10 sectors. This effect is further assumed to be constant 
in any one of the ten sectors. The lethality in each sector 
is reduced by the body position probability, construction' per¬ 
centage, window percentage and probability of particle size. 

It remains to determine an average over the 10 sectors of the 

area under investigation, and then to divide the mortality 
figures into time-to-death categories. This division is ac¬ 
complished in the same manner as was done in the translation 
model. Finally, a weighted average total over all areas of 
interest is obtained by considering both inside and outdoor 
populations to be uniformly distributed over the total inside 
and outside areas. 
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3.3.4 Thermal Radiation Model 


The thermal energy reported as free-field actually includes 
attentuation due to the interaction of the atmosphere and the 
light source path to the ground. The thermal radiation energy, 
Q, as expressed in Erj. (4). is further attenuated by whatever 
shielding is available between the radiation source and the 
recipient. The attenuation caused by full shielding as the 
result of interaction with another structure is 100 percent. 

The percent of radiation transmitted through window glass and 
screens as reported in Ref. 23 is given in Table 14. 

Table 14 

THERMAL ATTENTUATION FACTORS, rj 


Single Glass 
(!) 

Double Glass 
(%) 

Screens 

(7o) 

56 

31 

67 


The above quantities may be combined in series for various 
combinations of window cover. (In the case of open windows no 
attenuation takes place.) The termal energy within a structure 
is then 

Q' - 

where q represents an attenuation factor developed from Table 14 
taking each material placed between the interior and the ex¬ 
terior of the building into consideration. 

The thermal radiation energy in the street outside, is 
represented by the total Q, provided the street is not shaded 
by another building as shown in Figure 36. No thermal injury 
is assumed to occur in the shaded portion of the outside area. 

In order to compute casualties or. the outside, the curves in 
the radiant exposure as predicted are scaled to 1 MT. The 
curves in Figure 19, with the known value of radiant exposure 
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To Point of Burst 



Fig. 36 SHADING EFFECT OF SURROUNDING BUILDINGS 
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and season of the year are used to determine the percent of body 
area burned. After the latter is known the corresponding kill 
and injury probabilities may be found by using Figure 16. 

Figure 20 utilizes the information obtained from Figure 16 in 
order to break down the kill probabilities by time to death. 

The final probabilities are adjusted for the percent of popula¬ 
tion on the outside and the ratio of the unshaded area to 
total area. 

In order to determine the effect of thermal energy within 
structures, both attenuated energy exposure areas within the 
structures and shielding from adjacent structures must be de¬ 
termined. The exposure area within the structure is computed 
using window dimensions, the angle of incidence of the thermal 
energy, 0, and the building orientation to the blast d. Three 
floor areas are determined: 

a. area for people standing, 

b. area for people sitting, 

c. area for people lying on the floor. 

An example of the linear dimension into the room is illustrated 
in Figure 37. An attenuated Q is determined within each of 
these three areas and kill and injury probabilities computed 
as in the outdoor case discussed previously. The probabilities 
are then combined based on the percent of the total building 
area involved to determine the total kill and injury probabilities 
for the building. Computations are repeated for each building 
at the point of interest. If uprange shielding by a contiguous 
building occurs, the total irradiated area within the building 
is reduced by the percent of the building being shielded. 

3.3.5 Ionizing Radiation Model 

Ionizing radiation dose determined by using Equation (4) 
and (5) includes atmospheric attenuation between the burst 
point and the node point. Unlike thermal radiation, however, 
ionizing radiation is not completely attenuated by the presence 
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rays are attenuated in the following manner: 

I = R^e" 0,0113 P x (rad) 

where p is the density of the shielding material (pcf) and x 
represents the path length through the shielding material. 

Figure 38 illustrates the relationship between the shielding 
thickness and the attenuation factor applied to the integrated 
neutron flux (Ref. 33) for several common building materials. 

Here the attenuation factor is much more sensitive to the type 
of material employed as shielding then in the case of gamma 
radiation attenuation where only the mass thickness is important. 
The effects of scattered radiation and buildup factors have 
been neglected. The accuracy of the above radiation computa¬ 
tions seems to be consistent with the effect of ionizing radia¬ 
tion as a kill mechanism for high yield weapons. 

In the case of outdoor population, shielding is approximated 
by a building having the average characteristics of all the 
buildings at the node. Furthermore, outdoor population is con¬ 
sidered surrounded by this shielding. Once the computations 
have been made to determine the average shielding of outdoor 
population, the actual doses may be found, and using Figure 22 
the probabilities. of death and injury determined. The time 
to death relationship is shown in Figure 23. Here, as in thermal 
radiation, the minimum time to death was selected as one day. 

The indoor population is exposed to a dosage which is 
dependent upon attenuation factors which vary within the build¬ 
ing. These attenuation factors are computed using the thickness 
of material placed between the interior and exterior of a build¬ 
ing. This is determined by computing the shielding of the 
floors and walls of the building for individual cells within 
the building as illustrated in Figure 39. The ionizing radiation 
dose in each cell is computed and the corresponding probabilities 
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Building Section (elevation) 


cell floor area = (H or w)•A cos 8 

^ burst height 
tan 0 -—-“— 


range 

shielding thickness at a cell = -g 


w 


+ N 


_ f 
sin 0 


N = number of floor thicknesses the energy must pass 
through to reach the cell of interest 


l = building length 


w = building width 


Fig. 39 METHOD OF DETERMINING SHIELDING IN BUILDINGS 




of death and injury again determined for each cell from 
Figure 22. The population within any building is considered 
uniformly distributed, therefore, a weighted average, based on 
cell area and probability of kill and injury can be determined. 
This process is repeated for each building type at the node 
^ .and adjusted for percent of buildings of a particular type of 
construction. 

3.4 FACTORS NOT INCLUDED IN SEP CODE 

Topography obviously plays a significant role in the inter¬ 
action of weapon parameters with the structural environment. 

The free field overpressure, for example, has been shown to 
increase on the up slopes and decrease on the down slopes of 
hilly terrain (Ref. 34). Also buildings on the reverse side 
of hills are protected from thermal and direct ionizing radia¬ 
tion (for low height of burst). These effects, however, were 
too ill-defined at present to be included in the analysis. 

The effect of ground shock on the production of casualties 
has been reviewed in this study. Although this effect was con¬ 
sidered, it was not included in the analysis for two reasons: 

• At lower overpressures (i.e., below 20 psi), 
which are of primary interest, the ground 
shock effects are negligible in relation to 
other effects, and 

• One-dimensional ground shock information 
(Ref. 35) which can easily be implemented 
shows little correlation with the latest 
two-dimensional ground shock analyses now 
being employed (Ref. 36). 

The new analyses are too expensive and time consuming to in¬ 
clude in this effort. 
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3.5 COMBINATION OF INDEPENDENT CAS UA LTY EFFECTS 

Two matrices in the output of the SEP code provide the per¬ 
cent killed and survived respectively for individual casualty 
effects and within specific time periods. These individual ef¬ 
fects are first combined with the specific time periods (i.e,, 
hour, day, week, month) and finally transformed into total sur¬ 
vivors, mortalities and injuries. 

The first of the two matrices, percent of population killed 
by each individual effect (e,g., blast, debris, thermal, etc,) 
in each time period (e,g,, hour, week, one day, etc,) is trans¬ 
formed into the second. This is accomplished by sequentiallly 
subtracting the percent affected in the present time period from 
those remaining in the previous time period. Initially the per¬ 
cent of people inside or outside is used as in the previous time 
period depending upon where the specific event takes place. As 
an example of this technique, suppose that 50 percent of the 
population are indoors and that 10 percent of the indoor popula¬ 
tion die from blast in an hour. Then, the percent which will 
survive indoors from blast for an hour is 50 - 10 «* 40 percent. 
Suppose also that 20 percent die from 1 hour to a day, 5 percent 
die from 1 week to a month and 2 percent are injured. Then 
40 - 20 * 20 percent survive between a day and a week, and 
20 - 5 = 15 percent survive a month. Finally, 15-2-13 per¬ 
cent are uninjured from blast indoors.. 

After the survival matrix has been generated, total sur¬ 
vival from all effects may be determined within each time to 
death for inside and outside populations. This is done by ob¬ 
taining the products of surviving each individual effect. As an 
example, suppose that 20 percent of the population survive a 
week from blast indoors and 15 percent survive a week from trans¬ 
lation indoors. Then 20 x 15 - 3 percent is the probability of 
surviving the combined effects of indoor blast and translation. 

The total uninjured persons, injured and dead may be cal¬ 
culated by applying the population, indoor and outdoor, to the 
appropriate total percent surviving from all effects. Total sur¬ 
vivors are those injured plus those uninjured, the total dead 
are 100 percent minus the survivors. 
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SECTION IV 
RESULTS 


In order to illustrate the prediction of casualties, the 
computer code developed in the previous section was utilized in 
a variation of parameter study for the evaluation of shelter 
systems. It should be emphasized that the results obtained from 
these parameter variations were picked to show up the sensi¬ 
tivity of the computer model. When parameters are varied in 
this computer model a complicated set of interactions takes 
place. As an example, when all parameters were varied for 
buildings not surrounded by any contiguous structure debris 
results were insignificant. However, when structures were 
introduced debris results were significant. To further illus¬ 
trate, consider the problem of building debris which effects 
people outside the building. With large spacing between 
buildings, no effect of debris shows up in the model, but as 
space between buildings is reduced the importance of debris 
on outside mortalities and injuries is increased. 

4.1 Primary Buildings 

The parameters of the basic structures which were employed 
in the parameter variations are presented in Table 15. (Table 
13 is in the actual computer rnput format, see Appendix 1 for 
a more complete explanation of this format). Whenever parameter 
variations were made they were made one at a time while holding 
the rest of the parameters in Table 15 constant. 

4.2 Range Variations 

Figure 40 illustrates the mortality effects inside the 
reinforced concrete frame building (R/C) for a 1 MT, 7,000 ft 
height of burst. The probability of being a mortality from 
translation effects, debris effects and thermal effects within 
the reinforced concrete building are displayed as a function 
of distance out from ground zero. Corresponding overpres¬ 
sures are displayed below the appropriate ground range and 
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Table 15 

PARAMETER VARIATIONS 


Reinforced Concrete Structures 


node and building parameters 
Area OF NODE It SQ. MILE 

number of buildings at node i 

LOCATION OF NODE X320000, Y»0,0 
CONSTRUCTION PERCENTAGE 100, 

HEIGHT 90* FT 
WIDTH 65, FT 
LENGTH 65. FT 

average space south 1000 , north 1000 , east 1000 , west 1000 , 

DENSITY OF WALL MATERIAL(CONCRETE) 135t LBS,/FT,«*3 
WALL PANEL THICKNESS 5 IN, „ 

ROOF THICKNESS 10. IN, ROOF DENSITY(CONCRETE) 135. LB,/FT,»#3 
FLOOR THICKNESS 8 IN, 

MATERIAL DENSITY OF FLOOR(CONCRETE) 135. LB$/FT**3 
BASEMENT WALL THICKNESS 10. IN, BASEMENT DENSITY 135, LB,/FT,R*3 
soil density 75, lb.'ft.»»3 
STORIES 9 

WINDOW PERCENTAGE 30* 

SILL HEIGHT above FLOOR 2.5 FT, 

NO SHIELDING PERCENTAGE 0.0 
SCREEN PERCENTAGE 0,0 
SINGLE GLA5S PERCENTAGE 50. 

COMBINED SINGLE GLAS5 AND SCREEN PERCENTAGE 0.0 

double glass percentage 0,0 

SHIELDING from DOUBLE GLASS AND SCREEN PERCENTAGE 0,0 

drapery blind and shade percentage so, 

DISTANCE FROM EXTERIOR WALL TO INTERIOR WALL 5,0 FT. 

INNER ROOM LENGTH 20, FT, 

NEXT 

CHARACTERISTICS OF wall fragmentation 
NUMBER OF PARTICLES 9 

INSIDE PERCENT 0,0,100.,0.0,Q,0»0.0,0.0*0,0.0,0,0.0 
MASONRY FAILURE *RES3URE 1. PSI 

overpressure at failure 1 , psi 
number of particles 9 

OUTSIDE PERCENT 100,.0,0.0.0,0,0,0,0,0.0,0,0*0,0.0,0 

wall type i 


* MASONRY INTERIOR WALLS 
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Table 15 (Contd) 


People 

DESCRIPTION OF PERSONNEL 

POPULATION DENSITY 100. PEOPLE PER SO. MILE 

indoor percentage of population so. 

OUTDOOR POSITION PERCENTASES STANDING 100. SITTING 0*0 LYING 0.0 

interior position percentages standing as# sitting ts. lying 0.0 
next 

skip COMMANDS 

ACCUMULATION 

ionizing 

NEXT 

SOLVE 


Wood Buildings 


WIDTH 35 . F? 

LENGTH 45. C T 

average Space south iopo. north 160b. east"Vqo'o. wfst iooc. 

r EN 5 1 7Y OF wUV MATERIAL - (Wood) ■*J^rir¥’wF"r"r «03 .. 

WALL P a n E L TMICKvESS 4 in. 

PCOF THlCKNpSF 1 IN. RCOT OLNS j TY (WOOD) 30 . LB:’/?!.#* 3 

FLOOR THlrPNFsS 2 -IN. . 

Mat^PtAL DENSITY OF fLOOR(WOOE) 3 0 , L D S ~/cu"*" pT ' 

P A § E Y E M T v* a LL THICKNESS” 10 . I NT" p AsEMFNT rtW fly ~30 • 0 " LB./Ft . <> * 3 
SOIL DENSITY 75. L ^ . / F T «••>•*> 3 


STORIES 2 


Best Available Copy 
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Table 15 (Contd) 


WINDOW PERCENTAGE 30 • 

SILL HELOH^“>^cV^LCCP 2.5 FT. 

NO SHIELDING PERCENTAGE ’(NO * 

SCREEN PERCENTAGE 0.0 .. 

single glass 'pErcen tag y '*soT : .. 

Combined single glass a n e s c o e e n ~p er cent age"’oTo”. 

double glass percentage o*c 

SHIELDING" "ERpy " DqUP~l E*~{VlA*SS And SCREEN PERCENTAGE "o.0 
Drapery Blind and SHADE PtPCENTAGE''5^T 
DISTANCE FROM EXTERIOR WALL tO’^iNTE'RlOR WALL Tf>T'^, 
INNFR »COM LENG TH $7 Tjl 

next ..". 

CHARACTERISTICS OF wALL FRAGKEnFa'tToN 

acceleration coefficient' ioT . 

NUMBER OF PARTICLES G ' . 

inside percent i cc.«o ~o.676FoToVoTo*o".oVo*.o«oTo V"’ 
masonry failure'pressurf" 17"psi 
Overpressure at failure i* p si 
NUMBER of »a«ticles 7 ’~' 

OUTSIDE PERCENT' “ 1 00’.'ToTfTTo.o*o.o.o,c*o.o.n.o«oToToTo' 

WALL TYPE 0 

« PLAS?EP INTERIOR WALLS. .. 
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Fig.40 RANGE EFFECTS ON MORTALITIES (Indoor) 









are in parenthesis In order to observe the full effect of 
debris, the failure pressure for the nonload bearing outside 
panel wall was set at 1 psi. In reality, tne failure pressure 
may be well above 1 psi and this will reduce both the mortality 
and injury due to debris. In Fig. 40, for example, if the ex¬ 
terior wall did not fail until 10 psi was reached, there would 
be no debris casualties beyond a 16,000 ft range. The apparent 
step in the translation curve in Fig. 40 is due to the assumed 
personnel posture within the concrete building. 

Figure 41 illustrates the injuries associated with the 
people indoors. At the lower ranges, the probability of 
injury is low due to the corresponding high probability of 
mortality. As the ranges increase the various injuries become 
more important and then begin to decrease and finally the 
curves go to zero. Here again, the effect of sitting as 
illustrated in the translation injuries would be eliminated at 
about 39,000 ft. Here too, if the 1 psi failure pressure of 
the outside walls was assumed to be a more realistic higher 
value, injuries due to debris would be eliminated in a much 
smaller range. 

Figures 42 and 43 illustrate the mortality and injury 
relationships for persons outside of shelters. Because of the 
large spacing (i.e., 1000 ft between structures) the effect 
of thermal radiation is prominent and debris is negligible. 

In Fig. 42 the flat slope of the curve starting at about 
25,000 ft is due to burning of exposed skin areas. Only 
below 25,000 ft does clothing ignite and a greater kill proba¬ 
bility result. Assuming a winter condition reduces casualties 
resulting from thermal radiation outdoors due to an appropriate 
increase in the amount of clothing worn. Personnel on the 
outside were considered to be standing, and translation mor¬ 
talities are indicated out to a range of 41,000 ft with injur¬ 
ies due to translation extending to about a range of 65,000 ft. 
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Note; numbers in 
parentheses indicate 
overpressure, psi. 



RANGE EFFECTS ON MORTALITIES (Outdoor) 

























4.2.1 Effect of Positions 


As was previously described. Fig. 40, the effect of per¬ 
sonnel posture within a shelter was seen to vary as to whether 
people were standing or sitting. Figure 44 illustrates the 
indoor mortality for personnel lying on the floor. Translation 
effects are dramatically reduced in this case over those standing. 
No indoor mortality is seen to occur beyond a range of 22,000 ft. 
However, the debris mortalities are slightly increased with 
personnel lying on the ground because their more vulnerable 
parts, that is, their chest and head are exposed to a greater 
assortment of debris. Here, all debris strikes the ground, 
but not all debris passes through a point 4 ft above the ground. 
Debris mortalities result out to a range of 30,000 ft for per¬ 
sonnel lying, however, for personnel standing or sitting, it 
predominates out to a range of about 26,000 ft. Comparing the 
sitting portion of the translation curve of Fig. 41 with the 
translation curve of Fig. 44, it becomes apparent that in some 
instances sitting appears to result in lower casualties than 
lying. This peculiarity is the result of the assumptions em¬ 
ployed in the translation model. The sitting person is assumed 
to slide and rotate about his feet. Rotation is the predomin¬ 
ate form of motion. Whenever rotation attains 90 degrees, the 
problem is stopped and the current motion information is used to 
determine the mortality. For a person lying, it is assumed that 
no rotation takes place and the body slides until impact with a 
wall occurs. A person sitting who rotates through 90 degrees 
will in actuality continue to tumble and slide during and after 
the rotation until he strikes a wall or friction overcomes 
exterior loading of inertia. During this period he will actually 
achieve the same or a greater velocity than the lying person. 
However, analysis of this sliding-rotating man is a much more 
difficult problem and beyond scope of the present program. The 
reader must therefore be wary of this anamoly. The effects of 
personnel posture on thermal radiation mortalities was not 
significant as illustrated in Fig. 44. 
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Range from Ground Zero, thousands of ft 


Fig. 44 MORTALITIES FOR A LYING POPULATION (Indoor) 
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Figure 45 illustrates the mortality probability as a 
function of range for personnel lying on the ground outdoors. 

As would be expected, from the previous effects indoors, thermal 
calualties are not reduced by lying down, and again the trans¬ 
lation effects are significantly reduced from a range of 40,000 
ft as per Fig. 42, to less than 25,000 ft here. These illustra¬ 
tions give the implication that the response of people may be a 
very important factor in saving their lives in a nuclear attack. 

4.2.2 Evasive Action to Thermal Radiation 

Figure 46 illustrates the advantages of taking evasive 
action from the thermal effects of a nuclear weapon. Three curves 
are shown for no evasion, two second evasion and ten second ev¬ 
asion respectively. These represent the times from the initial 
exposure until the people are completely shielded. For the 
case selected, it appears that evasion does not help when the 
range is between ground zero and less than 10,000 ft or beyond 
about 24,000 ft. Evasion is not a very important parameter 
beyond the 24,000 ft range because only exposed skin areas are 
effected and the total kill probability is low. However, in the 
range between 10,000 and 24,000 ft, the effective evasive action 
is quite significant. Even the rather slow time of 10 seconds 
can represent 100 ft (i.e., an average street width) if people 
run at 10 ft per second. It is difficult to imagine people 
responding in less than 2 seconds, unless they are inside a 
room where they can jump to a shaded area. Even so they would 
have to know both what to expect and what to do. 

i 

4.3 Building Types 

Obvious variations in building type may include the des¬ 
cription of the debris which occurs, and the failure pressure 
associated with it. As an example of the effect of the building 
type, a two story, one family wood frame buxlding was assumed. 

Here again, the building failure pressure was specified low 
enough to insure that a complete picture of debris effects 
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Range from Ground Zero, thousands of ft 
Fig. 45 MORTALITIES FOR A LYING POPULATION (Outdoor) 







100 percent people standing 
Weapon Parameters(1 Ml) 
Burst Height: 7000 ft 



Range from Ground Zero, thousands of ft 


Fig. 46 EFFECT OF EVASIVE ACTION ON OUTDOOR THERMAL MORTALITIES 
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would evolve. Figure 47 illustrates a relationship between range 
and mortality inside c’ne wooden building. In comparison with 
Fig. 40 for the reinforced concrete building, the translation 
mortalities did not change because translation effects for people 
standing inside buildings are not effected by building type but 
rather by the window opening percentages. Thermal effects are 
seen to increase somewhat because the greater ratio of exposed 
interior area to the total interior area of the building. Debris 
effects are far more interesting. At 15,000 ft range the mort¬ 
ality probability due to debris in the wood house is about 58 
percent while in the concrete structure in Fig. 40 it was seen to 
be about 75 percent. In the woodframe house debris mortalities 
extended to about 26,000 ft. 

It is obvious that care must be exercised in evaluating 
these results. First, the debris assumed for the concrete 
structure was heavier than that assumed for the wood structure. 
For the wood structure it was assumed that the 1x6 in. wood 
siding failed In 2 ft lengths for all overpressures. The re¬ 
sult was a fragment weighing less than 1 lb, which according to 
the casualty criteria illustrated in Fig. 10, must be accelerat¬ 
ed to nearly 100 ft per second before it is lethal. On the other 
hand the concrete building in Fig. 40, was assumed to fail in 
debris sizes of about 2 in. radius which require much lower 
ballistic coefficients (w/AC^, for lethality), than the wooden 
debris. In the short distance of travel involved, this differ¬ 
ence in ballistic parameters was apparently not enough to over¬ 
come the increased velocity requirements due to the low weight 
of the wooden debris involved. 

This example serves to focus the obvious requirement for 
knowing the character of the debris formed, as well as the 
associated casualty criteria. Both of these are areas in which 
more information is required. A further point concerning the 
debris casualties of the wood and concrete structures must be 
made. If the failure threshold of the concrete building had 
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occured at a higher level, the effect of the difference in 
debris would obviously not occur, and the weed building would 
appear to be more hazardous than the reinforced concrete build¬ 
ing at these ranges. 


Figure 48 illustrates the injury probability for each 
effect for the wood building. Again the effects of debris and 
translation injuries are more prevalent as in the mortality 
case above. 


4.3.1 Building Configuration Variations 

In this investigation the building parameters that were 
varied included the story height and the building width. The 
effect of varying the external and interior room lengths were 
also investigated and provided interesting results. All varia¬ 
tions were conducted at 20,000 ft fange for the 1 MT, 7,000 ft 
height of burst conditions. 

4.3.2 Building Story Height Variations 

Figure 49 illustrates the effect on indoor mortality due 
to varying the height of the structure, while maintaining a 
constant total floor area. Mortalities due to thermal radia¬ 
tion decrease slightly with increasing building height due to 
the reduction in the ratio of exterior room area where exposure 
takes place to total floor areas as the height of the structure 
is reduced. Translation mortality essentially remains constant 
since it is based on an overpressure level which in this model 
does not depend on the building parameters being varied. The 
mortality due to debris effects are increased with decreasing 
building height because the interior area exposed to debris 
from the failure of interior walls becomes a greater part of a 
total area which is held constant. Two debris sizes were select 
ed, one for exterior and one for interior walls. The debris 
from exterior walls does not produce a significant amount of 
casualties, so a reduction of the area exposed to the exterior 
wall debris causes an increase in mortality because the area 
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exposed to interior debris is increased. 

Figure 50 illustrates the effects of st'^y hMohr on ont*- 
door thermal injuries. Only a slight increase in mortalities 
is caused by decreasing the building height and increasing the 
exposed exterior areas. 

4.3.3 Plan Dimension Variations 

The effect of varying the plan dimensions of a nine-story 
building is shown in Fig. 51 for indoor casualties. The primary 
effect occurs in the case of thermal radiation casualties As 
the building width is increased, the illuminated area becomes a 
greater percentage of a total floor area and more casualties 
result. 

4.3.4 External Room Length 

The effect on casualties due to a variation in the ex¬ 
ternal room length is shown in Fig. 52. Only debris casualties 
have been shown since translation and thermal effects remain 
essentially constant over the region of variation. The differ¬ 
ence in the exterior and interior wall debris size assumed is 
the reason for the reduction in the casualties with an increase 
in the external room size. Practically no injuries or mortalit¬ 
ies are generated in the external room. Therefore, an increase 
in the exterior room size increases the total area associated 
with the exterior wall debris size and the result is a decrease 
in total casualties. 

4.3.5 Internal Room Length 

Figure 53 illustrates the effect of varying the interior 
room length and is perhaps the most informative of the building 
parameter variations. With very small interior room lengths, 
there are no debris mortalities but about 55 percent injury. 

This is explained by the insufficient acceleration of the debris 
particle to a lethal velocity. At very close distances to the 
wall the debris particles do not have time to accelerate to a 
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lethal velocity before they impact. However, the velocity is 
adequate to cause injury. As the interior room length is in¬ 
creased, lethal particle velocity is achieved and mortality in¬ 
creased. Injuries are reduced because the. low velocity region 
now represents a small part of the total area. As the room length 
is increased further, the mortalities drop off and the injuries 
continue to decline. This is caused by the particles impacting 
with the ground before they are able to reach the people at the 
far end of the room. 

4.4 Translation 

As can be seen from the figures presented previously in 
this section, the overall computer code is highly sensitive to 
the translation phenomena. As a result of this, further results 
and discussing of translation problems are provided. 

Figure 54 illustrates impact velocity as a function of the 
overpressure that was taken from the various runs performed in 
generating the other curves. The overpressure plotted is that 
which was applied to the model, both interior and exterior 
velocities are shown. The first observation to be made is that 
there is a significant difference between the sitting and 
standing cases. The second observation is that the results are 
a smooth function of the overpressure, with only minor depend¬ 
ence on the positive phase duration, as shown by interior and 
exterior velocities with the same overpressure. The inside 
cases correspond to shorter positive phase durations. 

This dependence on overpressure requires some additional 
explanation. The values illustrated in Fig. 54 are for rotation 
of the body only. This rotation to 90 degrees occurs in a very 
short time after the arrival of the blast wave. For the yields 
involved, the time for the rotation to occur is only a small 
part of the total positive phase duration, however, as will be 
shown later translation is dependent on the positive phase 
duration. 
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Head Impact Veioi 



Fig. 54 TRANSLATION IMPACT VELOCITY FOR STANDING 
AND SITTING PEOPLE 









Returning to Fig. 54, the most interesting part of the 
curve is below 3 psi for the standing cases. In this region 
the slope flattens out. Of primary importance is the fact that 
in this region, when the slope is quite flat, the translation 
velocity thresholds occur. This is also shown as the region 
where the overpresure range relationship, Fig. 55, flattens out. 
This means that a small variation in casualty criteria can cause 
significant variations in the ground regions over which these 
variations occur. Therefore, in order to predict casualties 
with reasonable assurance, one must be able to make reasonable 
predictions of the impact velocities. Similarly, casualty 
criteria must also be well defined. It is further obvious from 
the velocity differences between a sitting and standing posture 
that the reactions of people will play an important part in 
whether they will or will not be injured during this first phase 
of the translation problem. During the second phase of the 
translation in which people are knocked down, roll and tumble, 
their reactions will likely be of even greater importance. 

Figure 56 is an illustration of the velocity displacement 
relationships for several overpressures from the 1 MT, 7,000 ft 
height-of-burst case for a man lying parallel to the direction 
of the blast wave motion. The translation distances reveal the 
importance of considering what people will do and how they will 
react if blown these distances by the blast wave. Obviously 
the problem is not over when people rotate 90 degrees and 
strike the ground. 

This selected discussion of the blast translation effect 
has been an attempt to illustrate the importance of both the 
casualty criteria and the response of people in the prediction 
of casualties associated with a nuclear weapon. 

4.5 Fire Mortalities 

Up to this point only direct effects have been considered. 
This subsection discusses the relationship between blast 
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OVERPRESSURE RANGE RELATIONSHIP FOR I MT AT 7000 FT HEIGHT OF BURST 



















mortalities and fire mortalities for blast injured people 
trapped within burning buildings, (i.e., as predicted by the 
model). The model predicts a range in which persons indoors 
will be seriously injured and unable to move unless outside 
assistance is provided. This immobile period may last for as 
much as several hours after detonation of the weapon. The 
types of unjuries incurred are serious head injuries and broken 
limbs. In some cases self mobility will never occur. However, 
for this example, it is assumed that no persons may move and 
that no assistance is provided. It is then possible to 
estimate the additional casualties which may occur as a result 
of fires started within buildings where injured persons are 
trapped. 

Figure 57 illustrates translation injury probability for 
the sample problem. Translation injury only was assumed, be¬ 
cause it is the primary contributor to injuries. The second 
curve is the probability of ignition in a room for a clear day 
obtained from Ref. 23. With these two curves, estimates of 

the fire mortalities can be made. First, the blast translation 

2 

casualties occur in the area represented by r r, . For the 

b 

problem at hand r^ is 15,000 ft. 

Fire casualties will occur out to the range where there 
is a meaningful number of uninjured translation survivors, or 
approximately 29,000 ft from Fig. 57. Beyond this range most 
of the people are uninjured and they are assumed to assist 
injured persons prior to complete fire development, or they put 
out fires before the spread occurs. Therefore, the area sub¬ 
jected to fire is 7r r^ - 7r r^ where r^ is 29,000 ft. 

Two possibilities exist: (1) to assume that 30 percent 
of exposed rooms in each building ignite; or (2) that 30 per¬ 
cent of the buildings ignite. If the latter is assumed, fire 
spread from building to building must account for a complete 
kill to 29,000 ft. The blast mortality area is 2640 x 10^ ft 
squared; the ratio of the fire mortality to the blast mortality 
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RELATION BETWEEN INJURIES AND FIRE SUSCEPTIBILITY 









area is then 2640: 710 or 3.7; an almost 400 percent greater 
area is involved. 

Assuming case (i) above holds, that is only 30 percent 
of the exposed rooms of each building are effected, the build¬ 
ing area still represents more than 100 percent of the blast 
area. Considering the population density, which is an obvious¬ 
ly important number in determining the mortalities, (e.g., 
Chicago in the daytime has a average population density of 
50,000 people per square mile out to 15,000 ft. From 15,000 
to 30,000 ft the average population density is 30,000 people 
per square mile.), a 3:5 ratio is established. The ratio of 
fire to blast mortalities becomes approximately 220 percent, 
if all within the total injury region become mortalities, and 
67 percent if only even 30 percent are affected. Two further 
things must be kept in mind at this point: 

• The population density figures are for daytime; 
a nightime figure would reduce the population 
in the center of the city, the assumed ground 
zero, and raise the level in the outer ring 
where fire is more important. 

» The percentage of people indoors and outdoors 

will be different for the two regions considered, 
and this would certainly influence the ratio 
of mortalities. 

Although the above discussion is very qualitative, it does 
indicate that fire mortalities would probably be on the order 
of the blast-caused mortalities for people indoors. The 
incident of fire spread may well extend casualties well beyond 
the range of primary ignition. Of course, secondary ignition, 
(i.e., fire starting due to blast or ground shock and not 
thermal pulse) will be a contributor, but no information is 
presently well established on this subject. 
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However, secondary fires did occur in some of the weapon tests, 
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jured. They may be assumed to be putting out the fires or 
helping those outside who are seriously injured. 
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SECTION V 


VALIDATION 

Validation of models for predicting casualities to per¬ 
sonnel from the effects of nuclear weapons poses obvious diffi¬ 
culties. Although data from Hiroshima and Nakisaki weapons 
tests can be employed, the sources of this data report only 
partial information, and in many cases only sample data is 
available. The best data found on these two cities comes from 
Ref. 37 and 38, but even with this, questions of accuracy arise 
when a sample group must represent the total population within 
a building. Where available, weapons test data of dummies and 
animal translations were gathered for comparison (Ref. 39 and 40). 

Table 16 lists several cases from Hiroshima which were 
selected for comparison purposes. Structural information on 
the specific buildings was obtained from Ref. 38. All compari¬ 
sons were made assuming a 13 KT weapon at 2000 ft height of 
burst with a visibility of 10 miles. Table 16 presents the 
information for the buildings checked and the corresponding 
results. Models both with and without translation are presented 
because the model determines all results as if they were in the 
mock region, while for Hiroshima the regular reflection region 
ran to about 2000 ft from ground zero. This is not to ,say that 
it is more likely that blast translation takes place in\the 
mock region than in the regular reflection region. The loading 
in the regular region, however, is too complicated to include 
in the present model. 

Figure 58 illustrates the mortalities as predicted for people 
within the Hiroshima telephone office, as if it had been locat¬ 
ed at various ranges from ground zero. The total mortality with 
and without translation is provided as a function of range from 
ground zero. Individual mortalities for each kill mechanism 
and the effects of yield and heights of burst changes at 2000 
ft range are also shown. It becomes quite obvious that kill pro¬ 
babilities can be greatly influenced by these parameters. 
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Table 16 

COMPARISON OF ACTUAL AND PREDICTED HIROSHIMA CASUALTY RESULTS 


Building 

Actual 

percent 

Model with 
Translation 
percent 

Model without 
Translation 
percent 

Central telegraph 

15 

100 

13.5 

Central telephone 
office 

14 

93 

14 

Outside unshielded 
at 3000 ft 

96 

100 

100 

Outside shielded: 




a. Railroad Post 
Office R/C 

3.6 

0 

0 

b. Postal Office R/C 

4 

0 

0 


’Neglecting translation from the model, the check on the 
results is gratifying; however, several things must be realized. 
Tirst; all buildings must be modeled at the present time by 
rectangular structures. Most of the actual buildings were not 
simple, rectangular structures, and some had openings in the 
center. Second, the people are assumed to be uniformly distri¬ 
buted 'throughout the building; actually, they may have been 
bunched in specific regions of the building. Therefore; actual 
.verification of the model is impossible with the data available, 
however, gross inconsistencies can be indicated. 

Except for blast translation, the gross comparisons are 
quite ‘good. There were no primary blast mortalities reported 
for Hiroshima, and the model predicted none. There were very 
few thermal injuries within buildings, which was also a model 
prediction. There was mainly ionizing radiation kill and injury 
in the region from 1000 to 3000 ft, and the code predicted a 
significant portion of the injuries in this region to be due to 
radiation. The greatest disparity occurred in the blast 
displacement mechanism. Although cases of blast displacement 
were recorded, no one was reported killed by this effect. 
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However, as noted before for the Hiroshima burst, the regular 
reflection region extended to approximately 2000 ft and the 
computer model considers all cases to be in the Mach region 
where winds are parallel to the surface and blast displacement 
is more likely. 

To check at least the translation portion of blast displace- 
ment, anthropomorphic dummy data gathered from weapon tests was 
used. The comparisons are based on displacement of body parts and 
on rotation of the body at these displacements. Table 17 compares 
the actual and predicted maximum displacements and velocities. The 
maximum velocities for the standing dummy seem quite accurate, how¬ 
ever, the displacements are considerably different. The major cause 
for difference is that the computer code stops computing when the 
dummy has rotated 90 deg in either direction, while in the actual 
case the body continues to slide and tumble until it comes to rest. 

In the case of the prone dummies, no actual velocities 
were determined and only displacements can be used. Where dis¬ 
placements are recorded, they vary considerably from the pre¬ 
directed results. This may be due to local ground interaction 
effects which occur in actual tests and are not reflected in 
the model. When one compares the early stages of motion for 
each weapon test, the results indicate a much more satisfactory 
prediction capability than the total displacements indicate. 

Figures 59, 60 and 61 illustrate the velocity displacement his¬ 
tory for the early stages of the actual and predicted tests. 

It should be noted that the predicted results are based on the 
actual overpressure and positive phase duration. In addition 
to the c.g. velocity, head velocity displacement curves are 
shown. Based on these, it can be seen that the predictions 
are quite reasonable. Figure 62 illustrates the predicted 
and actual body rotations for the 37 KT Plumbbob and 1/2 KT 
Snowball tests. 
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700 ft 

Duration: 0.844 sec 
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169 lb) 























Fig. 61 TRANSLATION HISTORY OF ANTHROPOMETRIC DUMMY (5 ft - 9 in. - 16<> lb) 
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The model only allows rotation of the body to occur about 
the feet, while in the actual case, the feet are free to leave 
the ground, and rotation occurs about the center of gravity. 


However, 


from the figure, the actual rotations 


for the Snowball test are quite similar to those predicted. In 
the Plumbbob test, the model predicts backward rotation initially, 
but because of the friction force on the feet, final rotation 
and impact is in the forward direction. Had the feet of the 


model been removed from the ground, rotation would have been 
negative as in the actual case. However, it can be concluded 
that the translation prediction techniques are reasonable. 
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SECTION VI 

. . __ 1 t*n r>T-i/^n»a/T’xTir» AT T OM C 

(J lHNLiLUSlUlND nuu l\LbUTiiTiJiwm 

The result o£ this effort, along with Subtask 1614A, 
has been the development of a deterministic tool in estimating 
shelter effectiveness in terms of protection, when exposed to 
conditions more severe than design criteria. This evaluation 
of effectiveness is only possible provided detailed knowledge 
of specific shelter failure criteria is available. Furthermore, 
models for individual casualty mechanisms depend on a knowledge 
of appropriate biological damage functions. The present state- 
of-the-art is such as to limit the practicability of developing 
a statistical representation of shelter effectiveness. There 
are many detailed problems which can be investigated to refine 
the SEP code output. These problems are associated with struc¬ 
tural interactions, debris prediction, translation prediction 
and casualty criteria for many of the initial effects. The 
primary effort in future work should be to remove the qualita¬ 
tive aspects that now surround the casualty data. Development 
of statistical measures for both structural and casualty data 
would enable statistical bounds on the SEP code output to be 
established. 

The following conclusions can be made based on the 
results of the computer code and the information gained in con¬ 
ducting this study: 

• The computer code provides a means of evaluating 
the protective capability of various shelters, 
provided adequate information desciibing the 
shelter is available. 

• Many of the casualty criteria are studied estimates 
and require further refinement. 
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t The interaction of f •■*»*»-fi el d blast effects 
and structures is an important link in the 
prediction of casualties The present infor¬ 
mation on this subject is insufficient, 

• The physical posture of personnel in relation 

to blast-waves affects their survival probability. 
This is shown by the differences in casualties 
for personnel standing and lying when under blast 
wind translation. The response during the transla¬ 
tion may also be an important factor in lowering 
casualties . 

• Fire mortalities are of the same order of 
magnitude as blast casualties. 

The following are recommendations: 

• More adequate casualty criteria should be 
developed for debris, translation and com¬ 
bined effects. Experimental programs to 
relate debris mass and velocity to injury 
and mortality should be undertaken. Further 
studies and experiments of combined affects 
should be encouraged. Particular attention 
should be paid to the effect of medical treat¬ 
ment and the time to death. 

• A joint experimental and analytical study 
should be undertaken to determine the rela¬ 
tionship between physical response during 
translation and reduction of casualties. 

In addition the effect of the rigidity of 
the impacted material should be studied. 
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• Debris size, initial velocity and drag 
characteristics are necessary to adequately 
predict debris casualties inside and out¬ 
side structures. Presently, the only avail¬ 
able estimate of the failure sizes is given 
in Ref. 43 for hydrostone panels. Full-scale 
tests at various overpressures and simulated 
weapon yields should be conducted on a variety 
of panels. These tests should be related to 
analytical results and/or a reliable empirical 
relation should be developed. Various types 
of bearing and nonbearing panels with and 
without windows should be included in this 
study. Orientation effects should be studied 
in these panel tests. 

• Basements are an important area for further 
study. Failure criteria should be established 
for basements and suitable analysis developed to 
apply these criteria. 
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APPENDIX I 


PROGRAM USER'S MANUAL 

A. 1 .INTRODUCTION 

The code is a problem-oriented computer language which 
deals with the problem of defining casualties and injuries in 
a mfclear environment. Input to the computer code is a series 
of statements that describe the weapon parameters and the 
structural and personnel characteristics of a representative 
area. This area may consist of from a single building or 
open area to an area the size of which is consistent with a 
constant weapon effects assumption. The output of the code 
is normally the effects associated with each of five primary 
kill' mechanisms. These five kill mechanisms are further broken 
down by indoor and outdoor occurrence, and treated by the time 
required to cause death (i.e., an hour, day, week or month). 

In addition, injuries are distinguished from mortalities and 
personnel completely uninjured. The individual effects are 
combined and totals are found first for each category of time, 
and then for the overall problem. A detailed description of 
the environment associated with each kill mechanism is also 
available to the user as optional information. 

A.2 INPUT LANGUAGE 

The form of the input to the processor differs signifi¬ 
cantly from most other computer programs. Format and ordering 
of card input have been almost eliminated and replaced by a 
set 'of commands consistent with civil defense terminology. The 
fact that a group of characters starts with a letter is 
sufficient to recognize a word. Similarly, a number indicates 
numerical data; a decimal point distinguishes a decimal number 
from an integer; and a blank or a comma after a group of char¬ 
acters indicates the end of that group. 


IIY RESEARCH INSTITUTE 


149 





' The input commands may be data descriptors, data to be 
stored, or more generally information about the input process. 

A data descriptor (e.g,, YIELD or HEIGHT OF BURST) communicates 


with that command. Data to be stored consists of the numerical 


datd associated with data descriptors. Commands such as WEAPON 
PARAMETERS, WEATHER AND TOPOGRAPHY, NODE AND BUILDING PARAMETERS, 
CHARACTERISTICS OF WALL FRAGMENTATION, DESCRIPTION OF PERSONNEL, 
SKIP COMMANDS, INTERMEDIATE OUTPUT, and SOLVE actually control 
the internal flow of the program. Table 18 contains the dic¬ 
tionary of available commands. Each command occupies a separate 
input card in the data and a card may be continued by placing 
a dollar sign (?) in the first column of the following cards. 
Each input card is printed on the system output before the so¬ 
lution phase of the processor takes over. It is possible to 
put comment cards into the input phase simply by placing an 
asterisk (*) in Column 1 of the card. This card is simply echo 
printed, but otherwise ignored. Table 19 contains a typical 
set of commands which are sufficient to describe a full casualty 
problem for two buildings. 


Once the problem has been initially described, any sub¬ 
sequent changes will involve only those parameters that are 
being changed. It may be noted that a full set of commands as 
specified in Table 19 is quite lengthy. In order to shorten 
this list all input parameters have been initialized to consist¬ 
ent values. Thus, unless a problem contains input data which 
differs from this initialized state, the input list of Table 19 
is shortened considerably. Table 20 illustrates the initialized 
state of the code which specifies the value of all input param¬ 
eters implicitly at the beginning of all problems initiated by 
a SOLVE statement. An explicit statement of an implicitly de¬ 
fined input value is often useful in order to obtain a record 
that this value has been utilized in the problem under 
consideration. 
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Table 18 

A DICTIONARY OF AVAILABLE COMMANDS 


Process Command 


Data Descriptor* 


Units 


WEAPON PARAMETERS 

WEATHER AND TOPOGRAPHY 

NODE AND BUILDING 
PARAMETERS 


1 


1 


YT ELD MT 
HEIGHT OF BURST ft 
GROUND ZERO COORDINATES ft 

VISIBILITY miles 
SEASON OF YEAR 


AREA OF NODE 

NUMBER OF BUILDINGS AT NODE 

LOCATION OF NODE 

CONSTRUCTION PERCENTAGE 

HEIGHT 

WIDTH 

LENGTH 

WEIGHT 

AVERAGE SPACE S_N_E_W__ 

DENSITY OF WALL MATERIAL 

WALL PANEL THICKNESS 

ROOF THICKNESS/ROOF DENSITY 

FLOOR THICKNESS 

MATERIAL DENSITY OF FLOOR 

BASEMENT WALL THICKNESS/DENSITY 

SOIL DENSITY 

STORIES 

WINDOW PERCENTAGE 

SILL HEIGHT ABOVE FLOOR 

NO SHIELDING PERCENTAGE 

SCREEN PERCENTAGE 

SINGLE GLASS PERCENTAGE 

COMBINED SINGLE GLASS AND 
SCREEN PERCENTAGE 

DOUBLE GLASS PERCENTAGE 

SHIELDING FROM DOUBLE GLASS 
AND SCREEN PERCENTAGE 


sq miles 


ft 


ft 

ft 

ft 


kips 

ft 

lb/cu ft 
in. 

in.-lb/cu ft 
in. 

lb/cu ft 
in.-lb/cu ft 
lb/cu ft 


ft 


L5L 






Table 18 (Contd) 


Process Command 


CHARACTERISTICS OF WALL 
FRAGMENTATION 


DESCRIPTION OF PERSONNEL 


SKIP COMMANDS 


INTERMEDIATE RESULTS 
SOLVE 


Data Descriptor* 


Units 


DRAPERY BLIND AND SHADE 
PERCENTAGE 

DISTANCE FROM EXTERIOR WALL TO 
INTERIOR WALL ft 

INNER ROOM LENGTH ft 


NUMBER OF PARTICLES 
INSIDE PERCENT 
OUTSIDE PERCENT 

MASONRY FAILURE PRESSURE psi 

OVERPRESSURE AT FAILURE psi 

WALL TYPE 

ACCELERATION COEFFICIENT Ib/sq ft 

POPULATION DENSITY people/sq mi 

INDOOR PERCENTAGE OF POPULATION 

INTERIOR POSITION PERCENTAGES 
STANDING_ SITTING_ LYING_ 

OUTDOOR POSITION PERCENTAGES 
STANDING_ SITTING_ LYING_ 

BLAST 

TRANSLATION 

DEBRIS 

THERMAL 

IONIZING 

BUILDING DESCRIPTION 
ACCUMULATION 


★The descriptor NEXT indicates that the next command is a new process 
command. All commands and descriptors within them may be in any order and 
may be redefined any number of times prior to a SOLVE command. 
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Table 19 

SAMPLE PROBLEM TO ILLUSTRATE TYPICAL INPUT AND OUTPUT 

/ 

===== = . = ' ±= ===== ===== 

WEAPON PARAMETERS 

/ 

YIELD 1*0 MEGATONS 

HEIGHT OF BURST 7000. FT 

GROUND ZERO COORDINATES X 0.0 Y 0.0 FT. 

NEXT 

WEATHER and TOPOGRAPHY 

VISIBILITY 10. MILES 
SEASON OF YEAR 2 (SUMMER) 

* 1 IS WINTER 
NEXT 

NODE AND BUILDING PARAMETERS 

AREA OF NODE 1.0 SQ. MILES 
NUMBER OF BUILDINGS AT NODE 2 
LOCATION OF NODE X=7000» Y=0«0 FT. 

CONSTRUCTION PERCENTAGE 60. AO. 

* NOTE THAT THE TWO NUMBERS ABOVE ARE REPRESENTATIVE OF BUILDINGS 

* 1 And 2 RESPECTIVELY - THE SAME CONVENTION WILL HOLD BELOW 
HEIGHT 90. 60. FT. 

WIDTH 65. 100. FT. 

LENGTH 100. 65. FT. 

STORIES 17 15 

AVERAGE SPACE SOUTH 60. NORTH 60. EAST 60. WEST 60. 

DENSITY OF WALL MATER IAL(CONCRETE) 135. 135. LBS./FT,«»3 
WALL PANEL THICKNFSS 6. 10. IN. 

ROOF THICKNESS 10. 8. IN. ROOF DENSITY(CONCRETE) 135. 135. LB/CUFT 
FLOOR THICKNESS 10. 8. IN, 







Table 19 (Contd) 


MATEPjAL DENSITY or FLOOR(CONCRETE) 135, 135. LB./CU. FT. 

BASEMENT WALL THICKNESS 10. 12* IN. BASEMENT DENSITY 135* 135* LB. 

• /Cu. Ft. (NO NEED FOR CONTINUATION CARD A$ NUMBERS ALL Fly CARD 1) 
SOIL DENSITY 75. 75. IBS./CU.FT. 

STORIES 9 6 

• NOTE THAT THE ABOVE COMMAND HAS THE EFFECT OF OVERRIDING PREVIOUS 

• data above 

WINDOW PERCENTAGE 30. 20. 

SILL HEIGHT AbOVE FLOOR 2.5 3.0 Fy, 

NO SHIELDING PERCENTAGE 50. 40, 

SINGLE GLASS PERCENTAGE 50. 60. 

•NOTE WINDOWS ARE ElyHER OPEN OR COVERED BY A SINGLE GLASS - OTHER 

• POSSIBLE CONDITIONS ARE IMPLICITLY DEFINED AS A ZERO PERCENTAGE 
distance from exterior wall to interior wall 16. 14. ft. 

INNER ROOM LENGTH 20. 16. FT. 

NEXT 

CHARACTERISTICS OF WALL FRAGMENTATION 
NUMBER OF EXTERIOR WALL PARTICLES 1 
OUTSIDE PERCENT 100. / 100. 

NUMBER OF INSIDE WALL PARTICLES 9 

INSIDE PERCENT 0.0.70..0.0.0.0*0.0.0.0.0.0.0.0•30. / 0.0*100.*0.0.0.0. 

s o.o«o.o*c*o*o.o*o.o 

• THE ABOVE ILLUSTRATES A TYPICAL STATEMENT CONTINUATION USING $ 

• 

WALL TYPE 1 1 

« WALL TVPF 1 IS MASONRY 0 IS PLASTER AND HAS NO CASUALTY EFFECT 
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Table 19 (Contd) 

NEXT 

DESCRIPTION OF PERSONNEL 

POPULATION DENSITY 1000. PEOPLE PER SO. MILE 
INDOOR PERCENTAGE OF POPULATION 50. 

INTERIOR POSITION PERCENTAGES STANDING 30. SITTING Ao* LYING 30» 

outuoo r position percentages standing 7o. sitting 30. lying o.o 

NEXT 

* NOTE THAT ONE CAN SKIP ANY OF THE KILLIN G MECHANISMS WITH TH? 

« following command set 

« SKIP commands 

* BLAST 

* TRANSLATION 

* DEBRIS 

* thermal 

* ionizing 

a ONE can ALSO SKIP THE BUIlUlNG DESCRIPTION AND ACCUMULATING FEATURE 

* RY INCLUDING ALONG WITH THE ABOVE 

« BUILDING DESCRIPTION 

« ACCUMULATION 

o NEXT (THIS IS PUT AT COMPLETION OF SKIP COMMANDS) 

« 

* IF INTERMEDIATE OUTPUT IS DESIRED SPECIFY 

* INTERMEDIATE RESULTS 
« 

a THE FOLLOWING COMMAND INITIATES THE PROBLEM-BEFORE ITS ISSUE ANY 
a OF The PRECEDING data MAY bF CHANGED. ALSO NOTE ALL CARDS MAY START 
« IN ANy APbITRAPY CARD COLUMN AND ARE FORMAT FREE 
o SOLVE 
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Table 20 

INITIALIZED STATE OF INPUT PARAMETERS 


Parameter 

YIELD 

HEIGHT OF BURST 

GROUND ZERO COORDINATES 

VISIBILITY 

SEASON OF YEAR 

AREA OF NODE 

NUMBER OF BUILDINGS AT NODE 

LOCATION OF NODE 

CONSTRUCTION PERCENTAGE 

HEIGHT 

WIDTH 

LENGTH 

WEIGHT 

AVERAGE SPACE S_N_E_W_ 
DENSITY OF WALL MATERIAL 
ROOF THICKNESS/ROOF DENSITY 
FLOOR THICKNESS 
MATERIAL DENSITY OF FLOOR 
BASEMENT WALL THICKNESS/DENSITY 
SOIL DENSITY 
STORIES 

WINDOW PERCENTAGE 

SILL HEIGHT ABOVE FLOOR 

NO SHIELDING PERCENTAGE 

SCREEN PERCENTAGE 

SINGLE GLASS PERCENTAGE 

COMBINED SINGLE GLASS AND 
SCREEN PERCENTAGE 

DOUBLE GLASS PERCENTAGE 

SHIELDING FROM DOUBLE GLASS AND 
SCREEN PERCENTAGE 


Quantity o£ 

Parameters Value 


1 

1.0 

1 

0.0 

2 

0.0, 0.0 

1 

10 

1 

2 (summer) 

1 

1.0 

1 

1 

2 

3600, 0.0 

10 

100, Rest 0.0 

10 

All 0.0 

10 

All 0.0 

10 

All 0.0 

10 

All 0.0 

4 

All 1000 

10 

All 135 

10-10 

All 12, All 135 

10 

All 12 

10 

All 135 

10-10 

All 12, All 135 

10 

All 75 

10 

1.0 

10 

All 0.0 

10 

All 0.0 

10 

All 0.0 

10 

All 0.0 

10 

All 0.0 

10 

All 0.0 

10 

All 0.0 


10 


All 0.0 
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parameter 


Quantity 01 
Parameter© 


OVERPRESSURE AT FAILURE 
WALL TYPE 

ACCELERATION COEFFICIENT 

POPULATION DENSITY 

INDOOR PERCENTAGE OF POPULATION 

INTERIOR POSITION PERCENTAGES 
STANDING_, SITTING-> LYING__ 

OUTDOOR POSIT I0 ^?^ CEOTA ?ytn^ 
STANDING_» SITTING-, LYIN<»__ 

SKIP COMMANDS 

INTERMEDIATE RESULTS 


10 

1 

1 

1 


3 

7 

1 


Value 


DRAPERY BLIND AND SHADE PERCENTAGE 

10 

All 

0.0 

DISTANCE FROM EXTERIOR WALL TO 

10 

All 

0.0 

INTERIOR WALL 

10 

Ail 

0.0 

INNER ROOM LENGTH 


i 


NUMBER OF PARTICLES 

JL 

10, 9 

All 

0.0 

INSIDE PERCENT 

10, 9 

All 

0.0 

OUTSIDE PERCENT 

1 

0.0 



0.0 

All 0 (Planter) 

0 (Equiv. Spher. Rad.) 

1.0 

100 

0 . 0 , 100 , 0.0 
100, 0.0, o.o 

All off (0) 

Off (0) 






An alternative to this, however, is to state in a 
comment statement implicitly defined values. The command SOLVE 
terminates the input phase of the processor and transfers con¬ 
trol to the computational section. When the soecified Droblem 
is solved and the answer printed, control is automatically re¬ 
turned to the input phase. Each of the data descriptors will 
now.be discussed in detail. 

The process command WEAPON PARAMETER has three data de¬ 
scriptors: YIELD, HEIGHT OF BURST, and GROUND ZERO COORDINATES. 
The YIELD Is the weapon size in megatons. The HEIGHT OF BURST 
is Specified in feet as are the GROUND ZERO COORDINATES. These 
coordinates are laid out on some two-dimensional map of the area 
under consideration and are utilized to find distances from 
ground zero to node points under study. The command NEXT sign- 
niffes completion of specification of all data descriptors 
concerned with a process command. It is the means by which one 
gets from one process command set to another. 

The WEATHER AND TOPOGRAPHY process command specifies the 
VISIBILITY in miles and the SEASON OF YEAR (i.e., 1 for winter 
or 2 for summer). These parameters are used to compute the ther¬ 
mal radiation effects. The NODE AND BUILDING PARAMETERS process 
comtnand contains a great deal of data descriptors. A node is a 
finite area of the total area under consideration. It may be 
considered to represent one room within a building or a several 
milte square area in which many types of buildings exist. AREA 
OF NODE, in square miles, represents the associated area. NUMBER 
OF BUILDINGS AT NODE specifies the number of different types of 
representative buildings within the node under consideration. 

A maximum of 10 per node is allowed at present. CONSTRUCTION 
JRCENTAGE serves to break down the above types into the percent¬ 
age represented by each of the total. LOCATION OF NODE is a set 
of coordinates which, together with the ground zero coordinates, 
is utilized to find the distance and orientation from ground 
zero to the node. These coordinates are specified in feet. 
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HEIGHT specifies the building height of each building type con¬ 
sidered. Likewise WIDTH, LENGTH AND WEIGHT specify each build¬ 
ing's width, length and weight. The next data descriptor speci¬ 
fies the AVERAGE SPACE SOUTH_NORTH EAST_WEST_ 

between contiginous buildings in a single node. It perhaps is 
necessary here to explain that all buildings within a node are 
presumed to lie on a north-south-east-west orientation, however, 
the' node itself lies on some less general orientation with respect 
to ground zero. This orientation is determined by the node co¬ 
ordinates with respect to ground zero. Ordinarily building width 
is on a north-south orientation while length is east-west. 

The next set of commands describe the roof, wall, base¬ 
ment and surrounding soil characteristics. These include for 
each building type, WALL PANEL THICKNESS, DENSITY OF WALL MATERIAL, 
ROOF THICKNESS-ROOF DENSITY (same card), FLOOR THICKNESS, MATERIAL 
DENSITY OF FLOOR, BASEMENT WALL THICKNESS-BASEMENT WALL DENSITY 
(same card) and SOIL DENSITY. All thicknesses are in inches and 
densities in pounds per cubic foot. The data descriptor STORIES 
indicates the number of floors in each building type. At present 
thete is a limit of 100 floors imposed on any one building type. 
The' command WINDOW PERCENTAGE describes the percent of apertures 
in 'each building type, while the next set of command breaks this 
apetture percentage down by different types of shielding pro¬ 
vided. This set of data descriptors include NO SHIELDING PER¬ 
CENTAGE, SCREEN PERCENTAGE, SINGLE GLASS PERCENTAGE, COMBINED 
SINGLE GLASS AND SCREEN PERCENTAGE, DOUBLE GLASS PERCENTAGE, 
SHIELDING FROM DOUBLE GLASS AND SCREEN PERCENTAGE and DRAPERY 
BLIND AND SHADE PERCENTAGE. The final two data descriptors deal 
with the room lengths of typical exterior and interior rooms of 
each building type. They are DISTANCE FROM EXTERIOR WALL TO 
INTERIOR WALL and INNER ROOM LENGTH and are expressed in foot 
units. 

The next process command CHARACTERISTICS OF WALL FRAG¬ 
MENTATION indicates the overpressure associated with failure of 
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both exterior and interior walls. Exterior wall failure pressure 
Is InrHrated for each building type by the data descriptor OVER.- 
PRESSURE AT FAILURE f In a similar manner MASONRY FAILURE PRESSURE 
indicates interior wall failure pressure levels. The particle 
size description resulting from panel fragmentation is •tnputed 
separately for outside and inside walls. In either case the data 
descriptor NUMBER OF PARTICLE SIZES gives the number of particle 
sizes under consideration for each wall type. If a certain size 
particle is to be considered, the number of particle sizes must 
include all smaller sizes up to this size but not larger. There 
are nine possible sizes of equivalent spherical particles. These 
include 1, 2, 3, 4, 5, 6, 8, 10 and 12 in. radius particles. 

The commands OUTSIDE PERCENT and INSIDE PERCENT indicate the per¬ 
centage of each size category, for exterior and interior walls 
respectively. There should be as many percentages listed for 
each building type as there are number of particles specified. 

The number of particles specified inay be changed prior to 
specifying either inside or outside size distributions. If the 
user wishes to describe a projectile which is not represented 
by an equivalent sphere, he has the option of specifying the 
particle's acceleration coefficient. The data descriptor 
ACCELERATION COEFFICIENT describes the shape and orientation in 
flight of an individual debris projectile and is equal to 2x 
maAs/projected area in units of pounds per square foot. This 
parameter should be used in conjunction with one of the above 
radii in order to specify the approximate weight of the project¬ 
ile. Only one particle acceleration coefficient per building 
type is allowed and this parameter must be inputed explicitly 
for every subsequent case run. Each building is classified as 
having either masonry or nonmasonry interior wall panels by the 
dat;a descriptor WALL TYPE. An entry of 0 indicates nonmasonry 
wafl panels while an entry of 1 indicates masonry panels. Non¬ 
masonry walls have no effect on interior personnel. 

The process descriptor DESCRIPTION OF PERSONNEL identifies 
the number and deposition of personnel at the node. 
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POPULATION DENSITY is specified in units of people per square 
mile while INDOOR PERCENTAGE OF POPULATION specifies the per¬ 
centage of people inside the previously defined structures. The 
pei w s onne 1 i. s fot* olcc n down i.nto the percent standing sitting and 
lying both inside and outside by the commands INTERIOR POSITION 
PERCENTAGES STANDING-SITTING-LYING, and OUTDOOR POSITION PER¬ 
CENTAGES STANDING-SITTING-LYING. 

The next process descriptor, SKIP COMMANDS, allows the 
analyst to skip some of the kill mechanisms and only use those 
he actually wishes to utilize. These commands skip around the 
parts of the program associated with blast, translation, debris, 
thermal radiation, ionizing radiation, description of post at¬ 
tack building condition and accumulation of casualty information. 
The data descriptors are respectively BLAbf, TRANSLATION, DEBRIS, 
THERMAL, IONIZING, BUILDING and ACCUMULATION. These parameters, 
if.used, must be specified for each node of a run of several 
nodes. 

The user has a great deal of flexibility in analyzing many 
special cases because of the many commands available in the lan¬ 
guage. For instance, the user may wish to study the case of 
population in an unshielded area. He might do this by speci¬ 
fying the distance between contiginous buildings to be extremely 
large (e.g., 1000ft). If he is only interested in the effect of 
ioiTizing radiation he might set all the SKIP COMMANDS on except 
IONIZING. If it is desirable to study what is going on WITHIN 
one room of a structure, this may be simulated by a one story 
structure whose exterior walls do not fail. The interior wall 
properties of the structure correspond to the actual walls of 
the room. The exterior room length of the structure is set to 
zero. With this type of configuration, even one room within 
a building may be studied in detail. 

Table 21 illustrates the output of the program and is 
self-explanatory. In the final analysis it is felt that the 
language is both flexible and readily usable by a noncomputer 


user. 
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Table 21 (Contd) 
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APPENDIX II 


SEP CODE REFERENCE MANUAL 

‘ SEP code is a system designed to be run on the IBM 7094 
IBSYS MONITOR SYSTEM. Furthermore, due to storage limitations 
it’has been set in a overlay structure. All routines have 
been coded in FORTRAN IV with the exception of one FUNCTION 
SUBROUTINE MATCH. MATCH is written in MAP assembly code and 
is‘fully described in another publication (Ref. 41 ). All flow 
diagrams and program listings of SEP code, with the exception 
of MATCH, are included in Appendices III and IV respectfully. 
Figure 63 illustrates the general flow of the total system and 
Figure 64 indicates the overlay structure of SEP code. To 
facilitate card handling the system resides on an IEDIT tape, 
and only a small loder deck and the data are necessary to run 
the system. A diagram of the deck setup is illustrated in 
Figure 65. The IEDIT tape resides on physical unit B5 and an 
extra overlay tape unit AS, is also necessary for maximum 
execution efficiency. Table 22 illustrates the starter deck. 

Running time is approximately 0.5 min per node point, 
however, this may fluctuate slightly depending on the structural 
complexity of the node point. 
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MAINLINE PROGRAM 



* 166 







MAIN PROGRAM 
BLOCK DATA / 
SUBROUTINE CBINE 
SUBROUTINE BILDS 


LINK 0 


BLOCK DATA 2 

SUBROUTINE INPUT LINK 1 (Bl) 

SUBROUTINE EFFECT 

SUBROUTINE WEAPON 

SUBROUTINE FIND 

SUBROUTINE DELAY 

SUBROUTINE FINDAT 

SUBROUTINE FINDTO 

SUBROUTINE FIREFR 

SUBROUTINE POnODE 

SUBROUTINE RADION 

SUBROUTINE BLAST 

SUBROUTINE BLASTH 

SUBROUTINE BLASTD 

SUBROUTINE BLASTM 

SUBROUTINE BLSDIS 

SUBROUTINE DISPLA 

SUBROUTINE PFT 

SUBROUTINE PBT 

SUBROUTINE CHTIME 

SUBROUTINE BTRANS 

SUBROUTINE PCONI 

SUBROUTINE DEBRIS 

SUBROUTINE TRAMAT 

SUBROUTINE BDEBRE 

SUBROUTINE BTRANI 

SUBROUTINE TRAJ 

SUBROUTINE THERM 

SUBROUTINE PERCTH 

SUBROUTINE FIRINJ 

SUBROUTINE MATCH 


SUBROUTINE NUCLAC 
SUBROUTINE AFFECT 
SUBROUTINE ATTENU 
SUBROUTINE RADINJ 


Fig. 64 SEP CODE OVERLAY STRUCTURE 


LINK 2 (A5) 
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Data 



Fig. 65 SEP CODE DECK SETUP 
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S JOB casualty 

SIBSVS 

SATTACH 

SAS 

SATTACH 


3AS 

SEXECUTE 

** m I * B 

3lPJUU 

*1 EDIT 

SIBLDR MAIND 
SIBLDR DAT 

sibldr chine 

SIBLDR BIlDS 

sibldr unor 

$OR161N 
SIBLDR DATl 
SIBLDR INPT 

sibldr EFFEC 

SIBLDR WEAR 

sibldr dint 
sibldr deca 

SIBLDR f I NOT 

sibldr findp 
sibldr firef 
sibldr ponod 
sibldr pobre 
sibldr therml 
sibldr radi 

SIBLDR GEOM 
SIBLDR blas 
SIBLDR h 

sibldr d 

SIBLDR M 
SIBLDR blsds 
SIBLDR DISPL 
sibldr pf 
sibldr pb 
sibldr cut Im 
sibldr bt 
Sibldr PCON 
sibldr debr 
sibldr trama 

SIBLDR 80 

sibldr btri 
SIBLDR traje 
sibldr tHER 
SIBLDR PE r C 
sibldr FIrIN 
SIBLDR MATCH 
SORIGIN 


SIBLDR 

sibldr 

sibldr 

sibldr 

SIEDIT 

sdata 


NUCL 
AFFE 
ATTEN 
RADI J 


Table 22 


A5 

SVSL0A 

65 

SYSCKl 
IB JOB 

r.a-MiP-.SBllRCF.FTOCS 

SVSCKl«SCHF 


ALPHA.SYSUT2.REW 


ALPHA.STSLB4.REW 


STARTER DECK 
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APPENDIX III 


FLOWCHART OF CASUALTY PROGRAM 
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FA l .a 


.901.(49.91.0) 


1AV*(91*Al*9IM(P"IIX49*A9*C09(P((t)X(A|*9lll(PM1XA9*COO(P9l)) 


COM MUM 

MM49C* (4(«MT- TAMTMAOATI 



.LT.0.0 UUJ *94000.0 


PLM1>0 ILOMT (I) /PiOAKM’l (t >) 
F(.00i0*HtMA0t/Pl9T 
(ft009*n0009 
XPlOOOMPLOOa 



































MtUMl C4»U*lT» PtOttlM 


nm i 




















































































































































































10MIUM lAOUIIO* CAtUAlU nouu 


nMO(M», 1) >f LO*OM I!! tnott TX (t) /11.' 
TRM*TRMO(IMM> 

WIMrflMMIIWIt. 

KC.LWrLOkXll) 


YRANlTtR TO ll^kOUTlMt' 
ATTtttU 

TXH.AIL, mit», ATT, ATT, 


,V | J ATTM 

I " ITtlll 


ATTtORRM)«ATt*ATTtt»Nf*l I l) : 


14 


NTiNTUt) 


(0 TO It 


RT*I 

Mhl 

worTiDsKOorwiti/ti. 

(MLPMT)=*MlMH(t)/!f. 


1 h 

nfiii ' : ii i i i ii i? j 


TIORT(T ) rfLORTM11) /It. 
CCLL«(t):10.*MI 
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14 

—"1 

TO 


r C , 

TYt:AO(*A ,N> aYLORT (1) *f LORONU ! j •* 

N.tT.I.ARD.N.Cl.NF LmO-a 

TRH:TRHO(M 

_ 

I 1 

THlCKrTLORTU) . , 


KKLsKFLORlAdl 


ATT# CM a N1 *ATMATTt (4*1 ,4*1) 
ATTMCM.N) «mN(IHI,N-t)*«TT 


*0 TO II 


TRKO «R, HI MOOT T (t) MOOTtN (11 
TKHiTRHOOM) 
MU.**ROOTR(I) 
THlMuKOOfTIl) 


ATT#(M,N) “Aft 
ATTN(M|M)»ATT 


YRMOW, Nl «UAaX A (I > * (I. - HR T tf IHCVM!) /100. >) WALK# 11) 
TRUtTRHO(M,m 
TMKRUMlTAIt) 
m*RMALHT(l) 


TRX,K»i.,TH!CR,«T*,ATT 


ATTt(M,N)«ATt 

ATTN«M,R)>ATT 


lAUTMt!) .0.0. 


CONTIWII 


«o re 

it 


TO 


Ot.it. MAMMY- MMt*€l)4MI/K»/10.) 


(0 TO 

11 


Ttt 


(DW1».).LT.(AVrMT-nM«/«» f-MM #0 TO II 




































































IONIUM IWUT10N CAlUALlT HOMil 


T*H*IWO« INI 

THl«!*Wl**lf/tlHCmtTA) 
KKl.«K*WNT 


niuam »a tiriiBAiivtur' 

ATTmu 

ntM.KKL,THICK,ATt,ATT . 


ATTAIN,K)*ATTt<N,N>*An 
*TTN(N,N)**tTN(N,N)**n 


MOXlN)«INMOiO/ltNITNJTAI) *<AMfMI.P- (10 .«CN+tl»»Lf*H«/«0)) 
THK.HNOXIN) 

THt«»(Ag!*XLP-lll>.«OHtMXi.P*M/*0))/ilN(T11tT»j 

MliUMilT 


''TtUNMT* TO WM0UTIW> 
ITTtWI 

yTIHMKl.THtCT.ATMTT J 


ATX»<N,NI»ATT*IN,NIMt« S~.~ ~ ~ 

' ATtN<N,l)»ATTN<N,Nt*iTT ™ u * 


1 J » J , 

CONTINUt 


_A" 

.MC.AVtHT I 


IHOMN) »AHOlD*AyU*U* 
TKHiKHOMM'. 


MRAN«r|R tO lUlftOV 


ATT4(« ( »)tlTTU» ( i)*ATi I 
ATTM(M r M)■ATYHiM^M) •ATI 


r^~ 


CONTINUt 

H 


KPRINT.It.0 


MtTKt.fOtMATTKM.ID.ATTMtM.m.llBl.ir) l—Hi CONTHM! 























































lOttWtM lUDUTIOD CAtUAl ft PKOtlAN 


tO TO ' 

in 




































































































































lONllUC RADIATION CAtUAlTV PNOMAH 


f A 6C 






































tAtftHttt tARUflAM <*4*U*l_r» HMAili Ntf J 




















tut or outh ai a Function or iaoiatioa oott 



_ 1 V-l _ 

oirr< uuom-ckao> / too. 
TiWTHiTAtxu.u»oirr*(TAtx(UAi)-tA(>(un 


tUCtHiO. 


































































APPENDIX IV 
PROGRAM LISTINGS 
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r\ r% n onn r» r> r» nr»o r> rv o r> n .o 


SIBFTC MAI NO M9<*,X»7 

COMMON/BLKI/TS.PRFE.PFTS.PD.TO.CnF .QO.WOU.TB,PBTB,mB 
COMMON/BLX?/ 67x*GZY«XNi^N*SStSN*SW»SE»Sl»S2»PHl 

COMMON/BIX3/ W.H0. VIS. Krt. FFb. AtonFw. t <>r ASM. TfiDA Y 
COMMON/BIX*/ AVFHT t AVFWT,AVE;w, AvEL»HM4X,Al,A?,A3«A4,A5»m ,D2»03.P4 

‘t 1 ? «W^ , ^ , H 5 * l<A,AT0T,D,SMA)<,DELTf) * FA,:Tl » rACT2 *J NnX,5> « AAA ^> 
*.»!’.D» 1 <iIMr3X2,prRPl'r>j, P0PDN«KtAC5i«*<EAC$T*REACLY 

COMsON/BLKS/ TA.CU.PWV.PDYP.PRFF 

COMMON/BLX*/ po, TQ,RJ,POnA 

COMMON/BLX?/ NN,PERCWiUO) *POBIIn(10) .BUILOW (10) .BILPLT()0>.CONPER 
1(10) .B»LPWt (JO) *P0SPR0(3) .POSPRI ( 3 ) * NFL (10) • AtNTRL (10) ♦EXRK 10) . 
2PRRF. A< 1 10) , JWALL T<10),*BT < 10) » PERCOA*BUOHT (10) 

COMMON/BLKA/ P°ERTB(10«9).PPERT1f10.9),BRKMAS 

COMMON/ 01 .K9/ OHRtDnYR,OWXB«DHTO«DOYTO»DWXTO,nMTHTO»DHTI ,PDYTI,PWKT 

H. nMTHT;,OHn,D"YP,OWKD.DMTO. DH.PD.DW.OM 
COMMON /BLKlft/ NHIU .HX (J 0 > , NY (10) . H J LL HT < 10) «HI ILL (1 0) « HI LI W (10) 
COMMON /BLK11/ WALPAN(IO).WALDEN(10).FlORTH(IO).FLORPNUO)«ROOFTH< 

110) iROOFPN(IO) .BASE™ (10) .OASEDN (10) ■* SO IL ON < 10 > iSILHT (lO) * PERSCR (1 
20).PFRSG(10).PFRGG »10).PFRUBS(10)«PERG(10).PFRPE <10)*PERGGS(10) 
COMMON /BlKI?/ nnYTHI,DWKTHl«DMTTHI,nnYTHO,DWKTHO,DMTTHO 
COMMON/BtK', 3 / AvEwTR.RADG.RAnN.DHBO.DDBOtDMBO.DH 0 I . DDBI ,PMBI. 

IPO I on i ,nwtnNji, pm I ON! «nninNO,DW!ONO»DMioNo 
COMMON/HLK14/TTI.TIP.01I.PIO.FII.FIO.RII,R10,TUN INJ.TFATAL»TAINJR 
COMMHn/BL xP/( I5Tl(6) ,I IST2(9)«LIST3(31) ,UST5(9) tl!ST6(7) ,LIST7(0) 

I . ! SKIP(A).LISTA ( 9 )» ABFTA. I A C 

START MEW frRPBLFM 

'*P0 WRITE(A.10") 

1O0 FORMAT(1^1j 

SET XPPINTSQ UNLESS THIS IS CHANGEO NO CONPITioNAL OllTPnT TAXES 
PLACF 

XPRINTsO 

READ IN PROBLEM PATA 
CALL INPIIT(XPRINT) 

CALCULATE A V FRA f ,E GEOMETRIC QUANTITIES AND SPECIAL NODE AREAS 
CALL GFOMET(XPBINT) 

calculate all p ref field weapon effects 

CALL ETFFCT(Xp»INT) 

PRINT all weapon EFFECTS INFORMATION 
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rt rt r> r> rt o o o r> r»."» 


r 

c 

c 

c 

c. 

c 


F0RMAT*4nHtn!5TAM<r.r PROM G«0UND ZERO Tq NODE POINT. 3H IS-t^lO.Oi 
14H FT./4lH0FRE r FIELD OVERPRESSURE AT NODE POINT .S.F7,c« AH PSI/ 

241H0P 0 A t TI VF P N ASF DURATION AT NODE POINT IS»F & • 3 • - ,J SEC/30H0 AR R1V 

. .. ...... . . _ M *» i. ii C t* /* 4 

3 AL T T M r A r NOIl 1 * ^ ' !5^o,j»hp *m- ' 

90 FORMAT<30HOTHE d mAL c NfrGy At NODF P01 NT*»F 10•2* 1P w CAL/C wo<> 2) 
WRIT C (4«91> D I 

91 F 0R M A T I 34H01 ON I 2 I *'■0 RADIATION IN(RAD) UN 7TSs,F10•?•RAHS> 

WRITE (S.1 IF) P^NA . u 

nf FORMAT nPHnA’TfKj'jATrn node 0VERPRESSUREs«F 6* 1 »4H P5n 

111 WRITE (A ♦ 1 IP) (*»ORI ID U ) 41 * 1 = 1« NN) 

IIP format ( \ nrj.F4,1 . 2SH PS! WI' HIN BUILDING TYPE»I3) 

WRTTF(4.AQ'0U*PWV«°nYP«PREF _ „ __ . 

fl 9 FORMAT t lFH^S‘ J O r K VFLOClTYs»FlO»2*AH F °5/20H0PE A< W t 1111^1 

10.2 * 4 H F p s /? 3HOoF ak dynamic PR E SSUR E=, F10 * 2» AH PS!/? HOPrFLECTEU P 

2RESSURF=.F 1 0.2 » 4H »?; ) 

CALCHLAT r r A E ! J A i_ T " c 3 DUE TO BLAST ALONE 
IF(15Kt p ■ !'- r O•0* CALL BlAST tKPRJNT) 

CALCULATE OASUALTIFS DUE TO BLAST TRANSLATION 
IF (!5KIP<2).FQi0) CALL BLSDIS(KPR I NT) 
calculate casualties due to blast debris 
IF(ISKIP ( 3).EQ•C1 CALL OFB°15(KPRINT) 

CALCULATE CASUALTIES due TO thermal RADIATION 
IF(I$KIpf4) .FQ,07 call THERM OCPRI NT) 

CALCULATE c ASI ialTIFS DUE TO IONIZING RAMADAN 
IF (ISK TP >5) .PQ.07 CALL NUCLAR UPRl NT ) 

PRINT summary cr INDIVIDUAL SILL MECHANISMS 

WR11E(f,300) D^BI«DDBI«D M BI*O mp O«DDBOiDMBOiDHTI»DDVT1,DWFII«DMTHTI 
^WR t TE ( A « 30! ! DHTO»DDYTO« ri, 4 lf TO«DMTHTO«TlO«DH,Dn,OW 1 DM*riI»DHD«DDVD« 

FOP FATAL TTTF S AND INJURIES <F 
2RACTJ0N OF TOTAL),///’- .AS < H*),/9H «• EFFECT ,21X,59H* DEAD HOUR * 

3 OFAD day * HEAD WFF< * ** ’• D MONTH * INJURED g 

4 INDOO D plAS t ,7 5X,4H* ,FS.2,6H ♦ ,F5.2,4H + ,11X»4H«- »F5.Z 
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n n n r> rt n 


5,4X,lH*,9x,lH-»,/?H ♦,2flX,lH*,llx,lH+,10X,lH*,IlX,lH*,i2x,lH*,9X,lH 
6^» /lftH ♦ 0"T nor*n BLAST,14X,4H+ ,F5,2,6H ♦ ,F5,2,4H *,11X,4H 

7 * ,FS.?,4 X ,lH+,9X,lH+,/2H ♦,28X,lH«-,llX, 1H*-, 1 OX « 1H+» 11X , lH* , 12X » 

ftlH*.9x, ♦ INDOOR TRAN$LAT I ON,9 X ,4H + ,FS,2,fH ♦ ,2<FS. 

92♦ TH * ) ,FS.2,4V,3H* ,F5.2,3H ♦ > 

1 rt I F Aftki A T I Ou a 'I A u . 1 . 1 t u . I i ^ . I U a 1 ) u . 1 ii i t *i >< till n u In, i^'iii 

2CUTOOOR TRANSLATION,8X,4M«- ,F5,2,SH ♦ ,2<F*>.2,7H * ),F5.2 

3,AX,3H+ *,/2H + , 2«X , 1H* ♦ 11 X , 1H*, 1 OX «1H+, 11X , 1H*, 12X, 1H + 

4 , 9X , 1 H* « / 1 AH ♦ INflOOR tlEBft IS, 14X ,4H + »F5,2,6H «• ,2(F5.2,7H 

5* > «F*>,2,4X,3H«- ,Fs,2.3H *♦ /2H ♦,2$X , 1H* , U X , 1H*, 10X , 1H*, 11X. 1 

6H**l?X,lHf«9X»lH*«/17H ♦ OUTDOOR DEttRIS,13X,4H* ,F5.2»fH ♦ ,2 

7(FS.?,th ♦ ),F5.2,4X,3 n * ,F5*2,3H ♦ ,/2H ♦,?8X,1H+,1IX,1H*,l0 

aX»lH+,llX,lH*,t2X,lH*,9X,lH*,/31H ♦ INDOOR THERMAL RADIATION -,,1 

91X,3H* «2(F4.?,7H ♦ f«FS.2,4X«3H« ,F5,2,3H ♦ ) 

30? FORMA T (2H ♦ , 28X, 1H+ , 11X, 1H*, 10X, 1H+, 11 x , 1H+, 12X, IN*,»X , 1H* »/31H *■ 
2nUTD00P THFRMAL RAD T AT ION +,llX«3H+ ,2<F5,2,7H ♦ >,FS.2,4X,3 

3H* »FS.?,3H •*, / 2H ♦ ,28X,lH«",llX,lH«-,10X,lH*,llX,lHf,12X,lHf,9X,l 

4H*«/3lM ♦ INnO^R ION 171 NR RADIATION ♦,11X,3H* ,2<FS.2,7H ♦ ) 

5,F5.?,4X,3H+ *F5.?,3H *,/2H + ,28X,1H+,UX,1H*,1 OX,1H*,11X♦1H*,12 

6X,1H+,<JX,1H*,/31H ♦ OUTDOOR IONIZING RADIATION *,11X,3H«- ,2IF5,2, 

77H ♦ ) ,F*5.?,4X,3m- ,FS,2t3H + ,/lH »08UH*I) 

c describe post attack condition of structures at node 
c 

!F<ISKTPI6).FQ.0> CALL BTL'IS 
COMBTNF FFFFCTS AND PRINT RESULTS 

call comrnf 

PROBLEM IS FTNTSHFD EITHER CHANGF PARAMETERS OF GO ON TO NEXT NOOF 

GO TO 400 
FNn 
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L y / f v* u^ 


“ST^FTC DAT 

BLOCK n AT A 

C0^M0N/f>L<?/ G7X.07'.XN. Y N.S5.SN.SW,SE,S1.S2.PMT 
COMMON/*L< V W.M R , V S. XO.FFRiATRnEN,! SR A SN, TODAY 

COMMON/*.' K 4 / A'/F^t. .V'r„T. AVFW, AvFL.HMA.X. Ai .A2.A3. A4.A5.Ol.02.D3.O4 
U05.Wi,»?.W3.wA,^i‘ A. AroT»OlSMAX«OELtO»rACTJl,FACT2. !►:»!< f 5) .AAA(fi) 
2. IND*1. TMCX2.«> r e?>’^, pqPDN . RE ACS I.R E AC ST, BR ACL Y 

Cu 'iN/tiLN ' / >1 ♦ r * ** ** A \ it;; 'KUuiLImiui < uu It i»h U.u m o i i. - 1 » 

1 (10) «ti T L ^W* ( 105 4 ts 0S r> R0f3) » P 0 S P R I < 3) .NFL (10)#AIMTPLfi0)«EXPL(10)» 
2P8Rt Ak {l*) . i w At l t < 1 n > .!BT < 10) «PERCOA«8ILDHT(10) 

CO^mpn/RI k */ - ;i F c ’‘’ r )'lO.9). e PER' ? I<10.9>.RRKHA$ 

CO^y^N /"L^v nHTll .wx MO).HV<\0J»H!LLHT(i0>,H!i r LL(lO)«H!LLW(l0) 
C0 M V n N , /o, ^ ; i / wAloakj / 10) .WALDEN (10) ,FlORTM( 10) »FL0 B "*'' IP) .R0QFTH< 
110) .ROnF^M Ii*i .BASFTH <10).^ASPDN(10).S0TLDM!10) •S IL H ~ * 10).PEPSCR (1 
20) iff '•:<;(,t \ n ' * F F p 0 r > ( 10) «pfr :j P,$< 10) » p EPG(10) ,PFRnE< 10) , PERGGS(10) 
co^y n N/Rix’ <■* / y ! t •’Pin; t .di o * P i i»F i o. r ir .rio.tuninj.tf'atal.tajnjr 
common/R!.< n/I. ;on (fi) »L'S*2 f 9) .LIST3(31) «l!ST5(9) * LIS T 6 ( 7 ) . LIST7{a) 
1 . [SK IP ffi) •!. T ' rti (9) . ABF"A,! A c 

PATA (LISTVT).IaJ.fi>/S.fiHOvTELD.fiHFl SSIO.fiHHF jGHT.fiHGROl'ND.fcHOONE 


1 X T / 

PATA (I JCT? f ’> /n-,fi u 0 P 0 AIP.fiHVlSlDI .fiHMllMBER.fiH 00 HILL« 6 HHEl 

1 0 H T . fi H ^ R A ? P N . 6 w 0 0 T T u E . fi w 0 r ; * T / 

DATA (LT SMM T ) . 1 = 14 V.' /30.fi- J \i; HRER.fiHLOCATI .6HPUII.DI .fiHCONSTp, 6HWE I 
ir.HT,fiHWPTr,wr.bW L ENir.T J A A V ERAS. 6H00NEXT. 

2 fiHO0AREA.6HOCWALL.6HnE 
3N5! T»fiH0 r LP0R»6H^A* r ^ I * v-'OOROOF. 6 HB AsEHE ♦ 6H00501L .6HST0R1E . 6 Hw IND0 
4W.fiHO0SlLL . fi^SPR FF* 4 6 HG I KG'-E ♦ fiHnOUPLF » 6 HnR AP eR . fiHQI ST AN»fiHOINNER« 
5fiHOOnOHO*6HCOMBrN.fiwSM!ELOX 

DATA (LT STS(T)»I s 1 ♦ 0 )/fi.fiH fl vFRPR«feHNU M BER.(SHOUTSID.fiHOOWALL♦fiHMASO 
1NR .fiHjMSniF . fiHPQHEXT.fiHACCELE/ 

DATA M. I STM!) .1 = 1 . 7 ) / 6 .fiHPoPiJLA. 6 HIHDOOR.fiHTHTER!. 6 HOUTnOO, 6 HREAC 
1TJ.fiHOONFXV 

DATA (L1ST 1 (!).1=1.9)/8»fiHW£APON♦6HWfATHf.fiHOONOOE•6HCHAPAC.6HDESC 
1RI.fiHOSOLVF,fiHTNTFR M .6H0PS<lP/.(LIST«(I).Irl,9)/«.6H0BLAST.6H7RANS 
2L . fiHDEPR! S.6HTWERHA.6HI0NT M .6HRUILD! .6H00HEXT . fiHACCl.lMI.1/ 

DATA u, AT R PR-VI. V I S. T SE ASM. T^D A Y .NN.XN, T RT . CONP ER . SS « SM . SE« SW « W ALP A H 
1 «FLOPTH.pDOFTH.RASFTH,wAlDEn»ELORUN.ROOFDN.BASEDN. 501LDN.NFL.PERPi 
2N.POSPD t ,POS°R r! . , 'IR.GZX.GAY,HX,HY,HILLHT.HlLLL,H!LLW.YN.RiJILDW,BlLD 
3HT,RTL n L' r . R ILDWI , P F *c OA , P EPC WI , SILH T , PE ROE .PER SCR ,PERG. PERSG .PERGG 
4»PERGGS. p F D DRS.FXRL.AlHTPL»P8REAtC.PPERTP.PPERTT .RRKMAS.POPDN.REACS 
5I«RfAC <1 T.RFACL y iNHTLL«IW A lLT/1 ,0.0,075.10.»?.l,0.1.3fi00..1.9*0.100 

6. . 9 * 0.0 ^ a. i ono, . 4 o * 1 2.0.40*135.. 10 * 75 .. 10 * 1 . ion. . 0 . 0.10 0 . . 0 . 0 . 100 . 

7,0,0.0.0.400*0.0.11*0/.APFTA.POPnN.PFRCOA.TUNlNJ.TFATAL.TAlHJR/ 

30.0.2*) . 0,3*0.0 


END 
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M RFTC CAINE 

SUBROUTINE c n M*>NF 

COMMON/BU^ 7 AyEHT,A V FWT.AVEM.AvEL,HHAx,Al*A2,A3,A4,A5,Dl,D2,D3,n« 

2*^nn , ?Mn^ , ^oP? ,KA,ATcr,DlSMAX,nELTE ’ trAC;TKfrACT2 ’ 1NDX,5) * A AA(<> 

2* IMnXl.TMnXP.proPtw. B^Dnki.tJf Arc t r>r~ a >« r* w r,»> . 

**■ - • • • 

W? ? ^r« K I / ^!' , « fRrwni0> *P 0 BILD( 10 ) •Btitl.nw( 10 ),BIiniTC 10 )♦confer 
niOJ.RTl n Kl(l0t ,P0SFP0 ( 1) » POSPR I (3) ,NFL < 10) ,AJNTRl <10)*EXRU10>,' 
^hBREAk iifi>«!WALLT<10>*!0T{10)«PEPC0A«RILDHT(10) 

COMMON/BUD/ DWA,PDYB,DMFB*DHTO*nDYTO,DWKTO,OMTHTO,DHTI,PPVTI.DwiCT 
iT.nHTH» T ,nMD*Dn v n,DwRn,OMrn, dm, nD, dw,dm * DhlCT 

COMMON /RL*l2/ nnYTHI,nWKrMl*DMTTHI*DOVTHO«DWKTiiO,DMTTHO 
COMMON ;rlk 13/ AvEWT*»,RAT)r.*&ADN*DHBO,DDBO»DMBO»nHB!,DnBI.nMBU 
inDIONl.nWinNT*n M lON!,nDlOKO,nW!ONO.DMlONO 

^«Mnf J/R 1 U n 4/TTl,TI0 ’ DII,nl0 ’ rn ^IO«RII««I0« T »lNrNJ,TrATAL,TAlNJR 
C0MM0N/Bun/LI«T1 (6) ,LIST2<9) ,L!ST3 (31) ,UST5(9) .IIST6 (7) ,LI 5T7 (9) 
1«!SK?P(6)*I. ISTB(9)«ABFTA«lAc 
DIMENSION SURV(10,5> 

FIN=PEPP!N/100. 

FOUTsl 4 o-FTn 
SURV» l,l)aFi«-nHBl 


SURVIl,?)aSU0V(l»l)-nnBI 

SUP V(1, 3> aSURV<1 * ?) 

5URV<1,4)=SUPV (1*3)-DMAI 
SUP V <1,5)sSunV(1, U) 
SUPV<2,l)=F0UT-nMPo 
SURV(2,?)=SIJ0V(2* D-DDAO 
SUP V(£«3)sSURV (2*2) 

SUP V ( 2 *4) s Sl|R V ( ?, 3 ) - OMHO 
SURV(2,5) aSimv»?«A) 
SURV(3, \) sFIN-PHTI 


sup v <3»2) =su° v 1 3 * n-nnvTi 
SURV (3,3) =Sl)OV (3,2) -DWRTl 
SURV(3,4)=SURV(3i3>-DMTHTI 
SUR V <3,51 sSUPV r 3*4)-Tn 
SURV(4,l)=Fn"T-DHT0 
suRv(4,?)=si.jRv(4,i)-nnYTn 
SURV(4,3)sSUPV(4,2)-DWKtO 
SUPV(4,4)sSURV(4,3)-0MTHT0 
SURV (4,S) sSl)RV(4,4)-TlO 
SURV(5,l)=FIN-riH 
SURV (S,2) sSURV(5,1)-UD 
SURV(5,3)sSURV(5,2)-Dw 
SURV(5,4)sSURV(5,3)-DM 
SURV(5,S)=S|)RV(5,4!-DII 
SURV (6,1) sFOMT-nun 
SURV (6,2) sSUPV(6,1)"DDYD 
SUPV (6,3) sSijRV (6,2) -DWXD 
SURV(6,4)-SURV(6,3)-DMTD 
SURV(6,5)sSURV(6,4) -DIO 
SURV(7,1)rFjM 
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SURV(7,2) sFlN-P!)Y t mI 
SURV(7,3)s$URV f?»?)-DwxTH! 

SURV (7,4)sSUPV(7,3) -DmTTHI 
SURV (7,5)=SUPV (?»4) -Ft I 
SURV(fl*l)=F0UT 
SURV(6,2)sFOUT-D^Yfwo 
SURV < fl , 3) sSl.»RV(fl*2>-n w <THO 
SURV ( 8,4) = S'J°V ? 8, 3) - UmTYHO 
SURV(S,5)sSU^V f r, 4)-FTO 
SURV (9,1) sF t \* 

SURV(9,2)=FTN-"OION! 

SURV (9,3) sSU^V f 9«?) -DwiONI 
SURV(9.4)rSHRV ^9,3)-DHTONI 
SURV (9,5) = Sijpv (0,4) -ot 7 
SURV(10*1>SF0U T 
SURV(10.7)=FOU T -DnrONC 
SURV*' 10,3>=S'lRV<in,2)-OWTO^O 
surv (m,4) ss'jpy (:r, ?> -dmtono 

SURV(10,*)=S"RV(ic,4)-p TO 

WRITE (a, 40") ((SURV( I ,j>, J=l,5),7=1,3) 

WRTTF(4.401; ((SURV(!,J?.j=l,5),1=4,7) 

WRTTF (4,409) ( 'S'JPV f I , j> . J=l,5) ,1=8,10) 

400 FORMAT <///*9W ’■vnivnuAL FFFFC^ MATRIX FOR SURVIVAL (FRACTION OF 

2T0TAL) ,' , 4 (ln*> , /«« * FFFFCT,2J X,65H» SIJRV, HOUR ♦ SURV, DAY 

3 ♦ SURV. WFf* * SURV, MOMT'i ♦ UNINJURED ♦♦/lH , 94 (l H+) , / 15H ♦ INPO 
40R BLaST,15X,1H+,4X,F5.2,4H ♦,4X,F5.2,3H *,4X,F5.?,4H ♦,4X,F5 

5,2,4y,4H^ ,F4,2,4H ♦,/2 h ♦,2«X,1H*,1?x,1H+,I1x,1H*»I?x, 1H4»,13 X 

6,lH>,llX,lH+,/l6H ♦ OUTDOO 0 PLAS7»I4X,1H + ,4X,F5»2,4H «-*4X,F5.2,3 

7H ♦,4X,F5.2,4W ♦, 4x ♦ F8 . <■ , 4X , 4H+ ,F5.2,4H *,/2H ♦,?8X*lK«,l2 

8X,1)U,UX,1H*,3?X,1H^.13X,1H>,11X,IH4,/21H ♦ INDOOR traNSLATI 0N,9X 
9,1H4,4X,F5.2,4H ♦ , 4x , F5 , <■ , 3H «■, 4X , F5.2 ♦ 4H ♦ , 4 X , F5.2,4X , 4H«- 

1,FS.2,4H 4,/?H +,?8X,IH4,12X,IH4,11X,1H4,12x,1H4,13X, 1H4,Hx,1h* 

2) 

401 F0RMAT(?2H * 0"T000R TR AMS'- AT ION* 8X »1H*, 4X »F5.2,4H *,4X,F5.2,3H 

2 4,4X,F5.2,4H *,4X,F5.^,‘»X,4H4 »F5,2,4H *,/2M *, ?8X , 1H*, 12X , 

31H4,llx,lH^,12X,lM+,l3x,lH+,nx,JH4,/l6M ♦ INDOOR DE*RIS,14X,1H*,4 
4X , F*> ♦ 2,4 W ♦,4X,F5.2,3H ♦ , 4X , F 5.2,4H ♦ , 4X * F5.2,4 y , 4H* ,F5»2, 

54H 4,/2H 4,2*X, lH*, 12X, 1H4,11X, 1H4,12X, 1H4,13X, in-*-, 11X,1H*,/17H 

6* OUTDOOR DE«RTS,13X,1H4,4X,F5.2,4H ♦,4x*F5,2,?H *,4x,F5.2,4H 

7 4,4X,F5,2,4X,4h4 »F5.Z» < *H ♦»/2h ♦, 28X, 1H+, i2X . 1 h * • 11X , lH*» I2X 

8,lH4,lTX»lH4,I)X,iH4,/3lH ♦ INDOOR THFrmal RADIATION *,4X»F5.2,4 
9H ♦,4X,F*i.2,7H 4,4X,FS,<!,4H ♦ ♦ 4X , F5,2,4X , 4H* ,F5.i?,4H ♦) 

40? FORMAT ( ?H ♦ , ? 8 X , 1H*, 1 ?X , 1H*, 11X , 1 «♦ , 12X , IH*» 1 3X , 3 H+, 1 1 X , 1H + , / 31 H ♦ 
2 OUTDOOR THFRMAL RADIATION ♦,4X,F5,?,4H +,4x,F5.2,3H «-,4X,F5.2 

3,4H ♦*4X«F^.F,4X,4H* ,F5,2,4H *,/2H ♦, 28X , 1 H„ 1 2 X , 1H + , 11X * 1H 

44,12X,1H4,T3X,1H*,1IX,1H4,/31H ♦ INDOOR IONIZING RADIATION 4,4X,F 
55,2,4H ♦,4X,F5.?,3H 4,4X,F5.2»4H ♦ ,4X,F5,2,4X,4M* ,F5,2,4H 

6 *,/ 2 w +,28X,lH4,l?X,lH4,llX,lH4,12X»IH4,13X,lH*,nx,lH4,/3lH ♦ 0 

7UTD00R IONIZING RADIATION ♦,4X,F5.2,4H + ,4X^5.2,3H ♦,4X»F5.2,4 

8H 4,4x,F5.2,4x,4M+ ,F5.2,4H ♦,/!« ,94<1H+)) 










SURVHIsi,o 

su«vm*i,o 

$URVWIal,0 
su«vMiri,o 
SURVHOsl.O 
SURVOOal* 0 
SURVWOs1*0 
SURVMOsl.O 
SURV!=! .0 
SURVO=1.0 


no i i*i»io,? 


SURVHIsSHRVHI»SURvn,l)/riN 
SURvnisSURVDI«SURV(T*2)/riN 
SURVWIaSHRVWT*SURV(I»3)/FIN 
5URVMIsSURVMT«SuRV{!,4)/FlN 
SURvI=SURv(I*51«SURVI/FIN 
$URVOs$tjRv( 1 + 1*5) «SURV0/F0UT 
SURVHOsS'iRVHOsSURVC 1 + 1,1) /FOUT 
5URVOOsSURVDORSuRV(!+l*2)/FOUT 
SURVWO=SURVWO«SURV(1+1*3)/FOUT 

1 SURvMOsSURVMO*SURV(I + l* A)/FOUT 
SURVHIsSURVHIoFlN 
SURVPlaSURVO!«FlN 
SURVWIsSURVWT«FIN 
SURVMI-SHRVMI<*F!N 
SURV!s5URvT*Fi« 

SURV03SURVO*FO"T 

SURVHO=SURVHO*FoUT 

SURvnO=SI»RVOO* r CUT 

SURVWOsSORVWORFOUT 

SURVMOaSI'RVMOoFOUT 

TOTSRVsSURVMT+SURVMO 

POPsPOPDNRPERCOa 

SURVaSMRVl + S'JRVO 

lfNINJ*SURV*POP 

FATAL*(l,-TOTSRV)«POP 

AINJRsPOP-FATAI-UNINJ 

WRITE(6,4o3) S'IRVHI*$URV0I,SURVWI,SURVMI,SURVI*SURVH0.5URVD0,SURVW 

10, SURVMQ* SIJRVO 


NUMBER 

NUMBER 


uninjured 

OF INJURI 


AD3 FORMAT ( //4?H SURVIVAL FRO r ' ALL EFFECTS (FRACTION OF TOTAL), //llH 
2 LOCATION* 21*,61 HSURV. HOUR SURV, DAY SURV, WEEK SURV. MON 
3TH UNIN j ltRED*//10H INDOORS ,25X,F5.2,8X,F5*2,7X,2 (F5.2,8X) ,F5.2 
4,//11 H 0UTP0nRS,24X*F5.2,BX,F5.2,7X,2(F5,2,8X),F5.2) 

WRITE (6,404) UMINJ, FATAL, AINJR 

404 FORMAT( //30H TOTALS FOR THIS NODE (PEOPLE) ,//17H 
2,7X,F9*0,//24H NUMBER OF FATALITIES ,F9.0,//19H 
3ES,5X,F9*0) 

IF(IAC.GT.O) GO TO 10 
TUNINJoTUNlNJ+UNlNJ 
TFATALaTFATAL+FATAL 
tainjrstainjr+ainjr 

WRITE (6,405) TUNINJ,TFATAL,TAINJR 

405 FORMAT f //41H CUMULATIVE TOTALS FOR ALL NODES (PEOPLE)t//17H NUMfiE 
2P UNINJUREP,6X,F10*0,//23H NUMBER OF FATALITIES ,FI0.0.//19H NUMB 
3ER OF INJURIES*4X,F10*0) 

10 return 

END 
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MRFTC BILDS 

SUBROUTINE BILPIS 
C 

C DESCRIBES POST attack condition of STRUCTURES At node 
r 

CCMMON/RLKf,/ PC, TQ.RI.P0NA 

COMMON/BUT/ N m ,PERCWI (10) !P0BlLP<10) ♦ BUI LOW (10) »BUPlT( 1C) .CONFER 
1(10).BTLPrf!110),POSPRO(3).PCSPRI(3 ).NFl HO),AINTPL(10)*EXRl < 10) , 

2PBREAK(10)*IWALLT(IP),IBT(l0)*PERCOA,31LPHT(10) 

COMMON/BUB/ P p CRTB (10.9),PPERTI (10*9) * RRKMAS 
WRITE(A*1D) 


DO 1 1 = 1 *.'-IN 
WRITE(ftill) T&T(I) 

If(PONA.LT.PHKfAK(!).AND.POBILD(I).LT.BRKMAS) WRITE(ft*12) 

If t PO.Nfi ,0 e .pBREAK CI) . AND. IWALLT {I) .NC*0) *RITE(ft*13) 

:: (POf.A .L r.P n R?AK (15 .AND. IWALLT (I i .NE.O.AND.POBILPd) .liE.BRKMAS) 
1*RI Tf. <ft*U5 


If C?0>.A.r,E,PBRrAK (t. AnD. >AuwT l ! 1 ,E<3.0) aRITE(6*15’ 

1 CONTINUE 

10 FORMAT n«*H0PO5T ATTACK DESCRIPTION OF STRUCTURES) 

11 FORMA i' (l4H03UIlDXN(i TYP£il3) 

1? FORMAT(31KCEKTFRI0R WALLS HAVE NOT FAILFP/39H INTERIOR MASONRY WAL 
ILS riAvF NOT FATlED) 

13 FORMAT (?!r.OtXTP*IOR WALLS HAVE FAILE0/35H INTERIOR MASONRY WALLS H 

i a v e failed; 

1 A FORMAT (3l;-.ft£XTrs:0R «ALLS have not r AI lE 0/35M INTERIOR MASONRY WAL 
US HAVE FAILED) 

15 FORMAT(27 n 0£XTEaS0S WALLS riAVt FAlLcD/iAH NO MA5CNRY INTERIOR WALL 


IS) 

RETuRN 

END 


SLOCK n ATA 

C0MM0N/BLKD/LIST1(6)*LIST2(9)«LI ST 3(31)«LI ST?(9>*LIST6(7),LIST7(9) 

I, 1 SKIP(A)*L!STB(9)* ABET A,I AC 

COMMON/BlKR/ D w B*DDYB,nWKB*DHTO*DDYTOtDWKTO*DMTHTOfOHTI.DDYTI.DWK7 

II, DMTHTi,DHD*DBYD,nWKn*nMTT\ DH.DD.DW.DM 

COMMON /BlKI?/ DDYTHI,nWKTH:,DMTTHI,DDYTH0*DWKTH0»DMT7H0 
C0MM0N/BLK13/ AVEWTB.RAOG*RADN.DHBO*ODBO.DMBOtPHBI.DDBI»DMBI* 

lODfONi.nwioNT.^MioNi* ddiono,dwiono*dmiono 

COMMON/BLK14/TTI»TIO,DII*DIO*F!I*F!0*RI1*RIO,TUNINJ.TFATAL*TAINJR 
DATA ISKTP/6«0/*DMBT,DDBI*UMBI*DHBO* 
aDDB0.UMB0,OH T I*DDYT!*DwKTIgDMTHTI*DHTO,DDYTO,nWKTO*DMTHTO*DH,DO,DW 
9,DM*DHD,nDYD,DWKD*nMTD*DDYTHliDWKTHI.DMTTHT »PDyTHO»DWKTHO*DMTTHO« 
1DDI0NI.OWIONI*PMI0NI,DnIONO,DWIONO,DMlONO/3A*0.0/»ABE7A/O.0/ 

PATA TTI*TTO*DM *P!0*F!T,F!0»RII*RI0/Boe»0/*IAC/0/ 

FNP 
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r» r»r» non 


SIRFTC IWPT 

SUBROUTINE INPUT (KPRINT) 

COMMON/BLK?/ G7X*GZY*XN*YN»SS*SN«SW*SE*S1*S2*PHI 
COMMON/BLKS/ W*HB»V!S«XO,FFr,AJROEN*ISEASN*TODAY 

COMMON/BLXA/ AVEHT»AVEWT*AV£W*AVFL*HMAX,Al,A2*A3*A4«A5*ni,D2*D3*04 
l,DS*Wi,wP«W3,W4,W5.t(A,AT0T«DlSMAX»nELTD«FACTlfFACT2« INDX (5) *AAA(5) 
2,1 N.iX 1, IMf)X2, P r Ri* IU, »O p ON»REACSI *REACST ,REACl* 

rOMMON/Ri <7/ N*',PFRCWT < 1C) *POB!lO( 10) *PniLlW l in) , BJl_OL T t1C) ♦CONFER 
1(50) ♦BTLOWKIO) ,F0SPR0(3) ,POSPRI (3) *NFL (10) , AI NTRL <10? *EXRLC10) * 
2PBREAK(10) ,IWAUT(1R),IBT(10) *P£RCOA*BllDHT <10) 

COMMON/RU*/ PP£RTB (10*9) ,PPERTt(10*9) ,BPKMAS 

COMMON /"LX 19/ NHILLtHX(lO) ,HY(10) *HIILHT n0),HIUl<10),HILLW(10) 
COMMON /RUC11 / WALPAN(IO)« WALDEN (10),FL0RTH(10)*FL0RDN(10)tROOFTH C 
110) «ROOFONdO) «8ASETH(10) «BA5EPN(10) *S0ILDN(10) tSILHT(lO) »PERSCR(1 
20)«PERSG(10)tPFRGG(lO),PERUB5(10)*PERG(10)*P£RPE(10)*PERGG$(10) 
COMMON/8LK0/L1 ST 1 (6) *L IST2 (9) *11ST 3(31) *LI5T5(9> *l!ST6(7) *UST7(9) 
1*!SX1P(R)*USTB<9),ABETA,1AC 

READ LIST OF DESCRIPTORS 

NPsO 

1 IXsO 
M»1 

2 I1»MATCH(LTST7«K*M) 

GO TOO,3,3,3*4)*11 

3 IX*IX*1 
M*0 

!F<IX-12»2tltl 

4 Kl»K 

GO TOO,13,2306*75,87*71,72) *K1 

weapon parametfrs 

5 ix*0 

M*1 

6 I1bMATCH(LTST1»K«M) 

GO TO(7,7,7,7,A) ,11 

7 ix*ix*i 
M=0 

IF(IX-12)6,5,5 
6 X1»X 

GO TO(9*10*11*12*1)*X1 
9 IlaMATCH(J*BX *3) 

W*BK«lOOO. 

GO TO 5 

10 11*MATCH(J *BK O > 

FFRsBK 
GO TO 9 

H I1«MATCH(J*BK«3) 

hb«bk 
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o r» r> 


GO TO <5 

12 T UMATCHUtR* ,3) 

GZXsRK 

Tl=HATfH(J*BK•3) 

GZY=BK 
GO TO * 

WEATHER AND TOMOGRAPHY 

13 !XsO 

M =1 

14 Il=MATrH(LlST2,K,M) 

GO T0<15*15,15*15,lft) *11 

15 IX = IX*-1 

M=0 

lFirX-12)14,13*13 

lft K 1 =K 

GO TO(17*15,19*19*15*21,?2«1)*X1 
17 Il=MATrH(J*BK,3) 

AIRDEN=RK 

GO TO 13 

ia ii=match(j*bk,3i 
VI5=BK 
GO TO 13 

19 Tl=MATrH(J,K,3l 

nhill=y 

IF(NHILL.LF.O) GO TO 13 
no 20 Tsl.NHTLL 
Tl=MATrH(LTSY 2 *eK,n 
T1=HAT0H(J * BK * 3) 

HXdlsPK 

!l=MATrH(J*PK,^) 

HYUlsRK 

Tl3MATrH(LlST2*BX*l) 

Tl*MATrH(J,BK,l) 

HILLHT(I)sBK 
Il=MATrH(J«BY,^) 

HILLl. (TJSBK 
Il3MATrH(J«PK*>) 

20 HILLW(T)SBX 
GO TO 13 

21 T1=MA TOH(J * K,31 
!SEASN=K 
GO TO 13 

2? Il=M A TfHf J»BK * 3) 

TODAY=«X 
GO TO 13 
C 

C NODE AMD B'IilOTNG PARAMETERS 

C 
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23 TX»0 
M«1 

24 U»MATCH(LTST3*K*M) 

GO T0<25,25,25,25,26),11 

25 TXsIX^l 
M«0 

!FI!X-I2)24,23,23 

26 K 1*K 

GO TO (27,26,110,37*45*101*105*109,55,1155*35*36,39,40*41,42,43,44 
1*47,48,49,50,51,52,53,54*62,136,132,134)*K1 

27 Il*HATfH(J,K,3) 

NNsX 

GO TO 23 

26 U*MATCH(J*8X,3) 

XNsBK 

Tl»MATrH(j,BX,3) 

29 VN*BK 
GO TO 23 

110 DO 111 1=1,NN 
IlsMATCHfJ,K,3) 

111 TBT(I)=K 
GO TO 23 

37 00 112 KOUNTsl,NN 
HsMATfH(J,BX,3) 

112 CONPFR(XOUNT)= p X 
GO TO 23 

45 DO 113 X01W*1,nN 
I1«MATCH(J,BK,3) 

113 BUILDS(KOll^T)=*X 
GO TO 23 

101 DO 102 KOllNTsl ,NN 
!1*HATCH»J,BX,3) 

102 BILDHT<XOUNT)sPX 
GO TO 23 

105 DO 106 KftU*H*l,NN 
Il«MATCH<J*BX,3) 

106 BILDLT(K0UNT)*BK 
GO TO 23 

109 DO 106 kount*i,nn 

llaHATOHfJ,BX,3) 

106 61 LOWIfKOUNT)=*K 
GO TO 23 

55 U=MATCH(J»BK,3) 

SS=BX 

11»HATCH(J,BX,3) 

SN*BK 

UaHAT0H<J,BX,3) 

SE*BK 

!laMATCH<J*BX*3) 

SW*BX 


23<f 





go to m 

155 NPsN«»*l 

fjO TO 1 

35 !IsMA TfH(J < 3K « 3) 
PF.RCOA = H* 

GO TO ?3 

3* 00 30 KO!INT = t,NN 
t i-mAT^HT J sB*' s’) 

30 WALPAN (KOiJ M T) = **K 
GO TO ? 3 

3** 00 31 ^ 0 "NTrt,MN 
I1 =mAT(“h<j«BK»3) 

31 WALDFN (KnuNT) = n K 
GO TG 2 3 

4(1 no 3? KOHNTsl ,“N 
T1sNAT^H(J *B<♦3) 
3? fLORth(KPUNT)= n K 
GO TO ?3 

41 no 33 fOUNT=l«MN 

1 lsMATTMJj.Rf»3) 

33 PLORON (KOUNT) = *K 
GO TO ?3 

4 ? no ’4 roilNTs! » M N 

IlsMATrH<J-BK i') 

34 R00FTH(«0t)NT) =4< 
DC 34 ^ 0 !'N T = 1 «NN 
I 1 = mATCH( j.B* • ’) 

34 ROOFHN(KOUNT) sn< 
GO TO ?3 

43 HO 1?0 KOUMTaUNN 
T1=MATCH(J«RK«7) 

1?0 BASFTHUnUNT»=' , if. 

no i?i kou^tsunn 

JlsMATTHfJ«B<»3) 
1?1 BASEnN(<ni)W7tsPn 
GO TO 23 

44 00 1?2 KniJMT=l*NN 
1IsMATfH(J«B* » *) 

12? SOI LON(KOUNT 1 sRK 
GO TO 2 3 

47 00 1?3 kount*i*nn 
T lsMATOH«J»K,31 
1 ?3 NFL UOmnTj =k 
GO TO ?3 

44 no 124 KOUNTsl.NN 
iumatchtj.bkO) 
1?4 PERCWI(KOUNT)= r K 
GO TO 2 3 

44 no 1?5 KnuNT=l«NN 

T 12MAT0H( J,8* < ’) 




r> o o 


125 SlLHT nr qiiniT) aaf 
50 TO 2 3 

t3* HO 131 KnuNTsl,N»J 
J 1 SM A T OH < J » BK «*) 
i3“* KtRut ('O'i^Ti aijtr/ioo. 

GO TO 23 

50 00 126 KOtWsl.NN 
T 1 SMATOH f J 4 P.K «9) 

176 PEPSCR (KOU^T) =nK/100. 

GO to 73 

51 no 127 K("HjNTsl«NN 
UsMATrH(J'BK«*> 

127 PERG <tcniiMT> sRK/100. 

GO TO ?3 

132 HO 1.33 KOijNTsltNN 
!IsMATfHIJ»RK, 

133 PF.RSG<tfo l, NT)3BV/100« 

GO TO ?3 

52 DO 128 KOU^Tsl.NN 
Il3MATrH(J«BKt3> 

128 PERGG(KOI»NT)aB»'/irO» 

GO TO 23 

139 no 13s KnuNTsl.NN 
T1»MATCH(JtBFm 
135 PERGGS(KOuMT)=«K/lCiO* 

GO TO ?3 

53 00 129 KOimsl.NN 
tlsMATCHt J«BKO> 

129 PERDPS flCOUNT) sPK/100. 

GO TO ?3 

5»» no no koumtsi,nn 
Il=MATrH(J»B«:»3) 

130 EXRL (KOljNTl = BK 
GO TO 23 

8? 00 602 KOUMT=l«NN 
J1 sMATCH(J«BK«3j 
602 AINTRL(KOUNT)sPK 
GO TO 23 

CHARACTERISTICS OF WALL FRAGMENTATION 

56 IX=0 
M=1 

5T IlsMATCH<LlST5.t(»Mt 

GO TO(58»58,S8.58,59>.II 

58 IX = r X 1 
M=0 

IF n X-12)57*96*58 

59 X1=K 

GO TO(60*61,6<m 66»6A*73,1.180)*Kt 
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r>nr> 


60 no 601 KOU k, T = 1 ,NN 
I1=MATCH( J,B* 

601 PBREAk(KOUMT'sPK 
00 TO *6 

61 !1=MATCH<J»K,3} 

NS< 

GO TO 6 6 

64 00 65 KO"NTsl,MM 
DO 65 T=1.M 
Il=MATrH< J«Btr « 3) 

65 PPERTBfKOJNT,I>=BK 
GO TO 56 

66 HO 67 KOl'NTsl ,NN 
11sMA TCH(J, K * 3' 

67 TWAL.LT(KOUWT)sf 
GO TO 66 

66 T1=MAKH(J,BT. 1) 
BRKMASsB* 

GO TO 56 

73 DO 74 *0'INTs1,NN 
no 74 t = l,*J 
I1sMA TCH(j«0K » 3) 

74 PPERTI UOIJMT. I > = 6* 

GO TO 56 

160 11 =MAYOH f J»BT♦3) 

ABE T A r"< 

GO TO 66 

OESCRI b TTqm PERSONNEL 

76 IX=0 
MSI 

76 I1=MAT0H<lTS76«K,M) 

GO T0(?7«77,77»7?,7«) ,u 

77 IXslX+1 

Ms 0 

IF<IX-12)76,75.75 
76 Kl=< 

GO T0(79t8P*M,«3,a*, 1 j 
70 Ils M ATf H f.t iP* , 3) 

°0 p [’N = RK 
GO TO 75 

80 T IsMA Tf H ( J »pi( « ’) 

PEOPTN=B* 

GO TO 75 

81 no lOfli 1 = 1,3 

IlsMATrM'j^BxOl 

mai pospr i m =a< 

GO TO 75 

8.3 DO 108’ T = 1 , 3 


239 








0^00 


UsMATCHf J,BK * 

10S3 POSPRO ( J)sRk 
GO TO 

A4 IlsMATOH{J,0*,») 

RE AOS T =Rlf 

Tl-MATOHf 
REACSTsBK 
IlsHATOHfj*Bn*3> 

REACLYsBK 
GO TO >5 
n XPRINT*i 
GO To J 
72 !X ~0 
Mai 

T lRMATOHd T ST8 • It ♦ Mi 

GO TO flT C ,170.170,170,171),!1 

170 IXsIX*] 

M = 0 

rrUX-121 170,7?,7? 

171 K1”K 

GO TO (17?<173,174,175,1T6,177,1,17®>,Kl 

172 ISKIP M)ai 
GO TO 7 p 

17.3 iSKI»(?)sl 
GO TO 72 

174 tSKIPM>=l 
GO TO 72 

175 ISKIP(4)a 1 
GO TO 72 

176 ISKIP(^)s1 
GO TO 7? 

177 tSKI p (M»l 
GO TO 72 

17® IAC=1 

GO TO 72 

THiS ENDS INPUT PHASE 


AT RETURN 
END 


»&»tta<xxH>aaa0tttt«4»o4a U e 
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r» r> o '-■* r»r»r>r» 


•SfRFTC EFFfC 

SUBROUTINE EFFECT (KPRJNT) 

.... _ -_—__ • n * m 0* *\tr ftrt . i.irtii* vA . DO ¥ A . 

COMMON /HL K l / T 2j t »T I ;}•»**■'• "Jvvui ~ ’ 

COMMON7BLK?/ GZX»G7Y,)N,YN»SS*5N»SW*5E,Sl*524pHl 

rOMMnKj/RLK3/ W.HB.VTS,XQ,FFfi,AIRPEN,ISEASN,TODAY . _ _ 

rOMN.ON/BLK*/ AVfM?,hVCNT, AVEW»AVFL«UMAX *A 1 *A2»A3♦AA« A5«Dl»DZ,UJff* 

1«DS♦W1»w?«W3« * w5 A» t TOT « DlSMAX • OEL TD*?ACT1*FACT?« t NDK(5i•AAA C5 . 

2,INDXl,!NDX2»P r R p !N* POPDN*RFACS|«REAC3T«REACLY 
COMMON/RLK*/ TA ♦CU*PWV* P DYP «PREF 

COMMON/BLXT/ NM«FfRCWT <! 0) *POBIlO< lO) .BUlLDwUO) •BILPLTIJO) *CONPrR 
1 {10) *BTinwM 10) #POSPROO) «P0SPRI (3) * NFL U0> »AIMTRL llfl) *t*Rl (10) » 

2PBREAK < 1^) » IWAILT (10) • T.B T M 0) »PE F 'C0A ♦B1LDHT (10> 

C0MMON/BLX13/ AVEWT0»RAO(j«RAnN»OH&G,nOBO*DMBO,DHBl»DPBI*rMBI* 
lDDlCM ,oMION!,unIONO,OWIONO,nMIONO 

calculatf overpressure and positive phase duration at nope points 
(Free rjFL n ) AMT) PRINT 

AT XO=SO«T( (r,7X-XN)*«?^(GZY-YNj<>»?) 

CALL hPAPQM(W,Y0 «HP,POiTO,Ta»0.0) 

USF R-m FQI'AT t^NS TO COMPUTE SHOCK VELOCITY * WIND VELOCITY* PEAK 
DYNAMIC PRESSURE, AND REFLATED OVER PRFSSURF AND PRINT 

CIJ S 112 A. PSOR T (1 ,-«>6.PPO/10?.9) 

PWVsSfeTO^PO/UOX.'^SQRT (I.♦<>.»PO/102*9) ) 

PDYPsS.ttPOPPO/'ZOS.P^.PPO 1 

PRFF = 2.« p O«-0. APPOYP 

CALCULATF THERMAL ENERGY AT NODE POINT <CAL/CM*« ? ) and PRINT (FF) 
TQxFIRF(W,XO,H p ,V ?‘) 

C Al ClJL A T F IO w I 7 I NO rAMSATrON IN RAPS AnD PRINT (FF) 

CALL RADlON(W,V0,HP,RT«pA T lG,RADN) 

COMPUTE Attenuated ''ODE OyFRPRESSURE 
PONAsP^NnnE fAV F H' r «AVEW T .P'~ ) 

COMPIITF ATTENUATEP !NTpRT nr5 0VERPRE55URF FOR EACH BUILDING TyPE 

00 117 1 = 1«N n 
WPxPFRCWT(T)/IOC . 

U7 <*OR!lD(I)= p O*R* r U<WP*PONA) 

return 

RNT) 


C 

C 

C 

c 

c 

c 

c 

c 

c 

c 

c 


7U\ 












STRFTC WFAP 

SUBROUTINE WFA e ON < w,Xo,HP iOvERR *POSP^iATiT) 

SCALE sw<Ht(l,/\i 

HBSsHB/SCALE 

xcs=xo/scaif 

OvrRP=FlMD(HBS»xOSJ 

BACBW-eUlft¥A»Ud<* . u^f 1 « ** A * i r 

- w.- - I S u . k: { , ,,, 0 , ,, < w a ^ M C u 

ATsFIN^ aT 'MgS* V0S>#SCALE 
t f(t >19,1?,n 

n OVrRP-nFCAY {(1VFRP,PnS?H,T) 

1? RETURN 
ent.i 
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8 l*rTC DINT 

FUNCTION FlND^'T^XO) 

DIMENSION , JP'P)*C!^) ( P'7M2)tZllZ) 


DAT A C.NP/1.,2..4..6.,ft,,iO. , 
1,44.43,41,7ft,7?.26.?0,16/ 

DATA <p ( I , 1 ) , 1 = 1,72) / 

X3860, , 7940 . ,4020. ,4lC(7. ,4i *o. 
X4780. ,48*0..4920. ,4o?n. ,*060. 
X5524. .85 , »6.,56?8. ,5680. ,5730. 
X 614 4,,4202.,6240.,671?.,6364. 
X 7 2 4 0 ».7 310., 7 3 ? 0 •«7 ? ft n ,•0 010 * 
X4270. .4 14o,,4040 ,,3‘?20. .37D0, 
X2700. ,2460. , 2 2 D o • . 1 «50. .1*00. 

nATA (PIT.?) .1 — 1.7??)/ 

X?4flO.,?*PQ.,?576..2624.,?672. 
X 304 4, , 3(7 83, , 31 7? ,. V. 76. ,32*0, 
X 3524, ,7536. ,75 «fl. ,’'-20, ,3660. 
X3934. . 797?. , 4O 1 r-. .403?, .405/.. 
X 316 0..?9*0•.?8 | 7 0 .,2470.,2540. 
X1440..1060.. 650.- -0«» -0. 

X -0., >0., -0«, -0., -0* 

DATA <P(I.3,,1-1.7?)/ 

XU30..1660..I 60 O..1 72 0.,1750. 
X1954..1978,,200?.,2026.,20^0. 
X?20fl, .?2?0.,'»24n. ,2?60. ,?2°2. 
X?44fl t ,?474.,?5 rt 0.,2512.,2524, 
XI300..1130., 900,, 540,, -0. 

X -o»» -o,, -o*. •** 0 * » **0» 

X -0., -0., -0., -0., -0. 

DATA <P(T ,4) ,1 = 1,72 )f 
XI360..137?.,1364.,1396.»1400. 
X1526,,1542,,155a., 1374.,1590. 
X1736,.1734.,1772..1790.,1810. 
X 1956» .1970. ,2000. .2000. ,20 l, 0. 
X 700., 320., -0», -0«, -0. 

X -0 » , “0 •, — 0., “0 •, «0. 

X -0,» ”0., ”0 «, -0 », -0. 

DATA <p<T ,51 , 1 = 1,721 / 

X1120,,1130.,1140.,1150,,1160. 
X1256.,12?2,.12aa.,1304.,1320. 
X1470.. 14«Q.,I 510.. 1530., 1 554. 
XI668..1674.,16«0..1550.,1420. 
X ••0,, "*0,, — 0 • » — 0 • » "0* 

X — 0», - 0 • , — O« , - 0 * » “0. 

X “0,, -0« , ”0•• -0•. “0* 

data (P(1,6) ,1=1 .7?)/ 

X 10 7 7 . , 1 0 3 1 ., 1 0 4 3.. , l fi 5 6 . - 1 0 a t , 
XI162..1135,,1179..1197..1?13. 
X 1.360. , 1 380, , l4 n 2. , !4?3. , 4.77. 

X1418..13Q2 ,, 1336., 925.. •"•"’5. 


15 ., 20 ., 30 ., 50 ., 100 ., 200 .. 72 , 58 , 48,46 


4260.. 4350..4440..4530..4620..4710. 
513? s ,6204,,5276.>5348,,5420,,5472. 

5796.. 5854..5912k,597C.,6028,,6086. 

6416.. 6468..6520..6710..6920..7080. 
4A70.,4740.,4830.,4540.,4460,,43*0. 
36 30., 352C33 70 »,322 0,.3050.,2900. 
) GOO. / 

2720.. 2776..2832..288ft.,2944.,3000. 

3268.. 3316..3364..3412..3460..3492. 

3700.. 3740..3780..3820..3858..3fi96, 

4076.. 4098..4120..4150..4170..4000. 

2410.. 2260..2130..1980..1830..1660. 
”0#, “0., —0 •, “0., - 0»* ■■ 0, 
-0./ 

1780.. 1ftl0.,1ft40.,1370..loOO.,1930. 

2072.. 2094..2116..2138..2160..2180. 

2304.. 2326..2348..23*0.-2396.,2422. 

2536.. 2548..2560..1600..1610..1450. 

~Q», - 0« , “0., -0., -o», -o» 

<•0., ~o., - 0«, - o ■<, - 0»* - 0. 

“Q. / 

1420.. 1438..1456..1474..1492..1*10, 

1512.. 1534..1556..1578..1700..1718. 

1830.. 1850..1870..1890..1912..1934. 

2010.. 2"0^.,?0on., 1270. , 1100., 930. 

—0,, "0., — O •, **0. , “0», "0. 

-0., '0., -0., -o.* -0., -0. 

-o.x 

1170.. 1184..1198..1212..1226..1240. 

1342.. 1364..1386..1408..1430..1450. 

1578.. 160?.,16?6.,1650..1656,,1662, 

1290., 3 140., 1 730., *60., 640,, 310. 

— 0,, "0.. — • — 3, , — C • ♦ —0. 

-0., -0., -0., -0., -0., -0. 

-0, / 

1078.. 1090..1102..1114..1125..1137, 
’2.30., 1253. , 1273., 1295,, 1315,« 1340, 

1447.. 1453..1457..1453..1450..143ft. 

825., 791 ,, 745 ,, 570., 110,, -0. 
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X 

-0« , 

“0 ♦, 

“0» » 

-0 • , 

-0. 

4 

-0. ♦ 

-0. , 

“0», "0»♦ 

-0,, 

•0. 


X 

-0* , 

•0, , 

“0« « 

-0. , 

-0. 

4 

- 0« , 

“ 0» , 

*•0» , "0. , 

-0., 

-0. 


w 

r\ 


n . 

-n : . 

-n. . 

*.<■). 

4 

“0, / 






nATA <P <! ,7) , 

1-1*72) / 









X 

820. ♦ 

8 ?6., 

8 32.. 

84?, , 

848, 

4 

655,, 

863.. 

872., 880,, 

890,, 

902. 


X 

9)7, , 

9'?. , 

946. * 

064, , 

9*4, 

4 

OQO 

7 7 V * 9 

1023,, 

<047.,106ft., 

1094., 

1125. 


X1150. , 

1 HO.,1183,. 

1191., 

1194, 

,1192. , 

1184,, 

1173.,1152., 

1067., 

661. 


X 

622, , 

5*5,. 

546* , 

505. , 

458, 


400,, 

347,, 

295•, “0,, 

“0 • , 

-0. 


X 

••0, , 

-0»,' 

-0.. 

-0» , 

"0, 


*01 , 

-0., 

®0 *, «0,, 

“0 5 , 

-Os 


X 

•0» * 

“0*« 

—0 •, 

-o., 

-0, 


-0.. 

*•0 • 4 

• 0», -0« , 

-0,, 

-0. 


X 

•0 * » 

-o., 

“0 ., 

“0,. 

-o. 


-0,/ 






nATA < 

p <!,*) , 

I — 1*72) / 









X 

71?., 

716. , 

7?(T, , 

729. , 

73?. 


738,, 

740, , 

747., 751,. 

756. , 

760. 


X 

766,, 

776., 

78?., 

792. , 

80?, 


812,, 

826,, 

842., 860,, 

381., 

911. 


X 

927, , 

936. , 

942, , 

942. , 

93ft. 


919,, 

850 . , 

575,, 541,, 

5^0., 

451. 


X 

403. , 

349., 

268., 


95. 


-0 i, 

-0. , 

-0»♦ -0., 

-0. ♦ 

-0. 


X 

•0 « ♦ 

-0. , 

-o.. 

“0, , 

-0, 


• 0, * 

-0. , 

-0 », •*0 *, 

-0., 

-0. 


X 

-0, , 

" C • 4 

**0*4 

“0 • , 

-0. 


“0« , 

-0, , 

-0., -0,, 

-0, * 

-0. 


X 

-o. * 

-Q» , 

-0 *, 

-o». 

-0. 


-o, / 






nATA <p<r,<?>, 

1=1.7?)/ 









X 

5 AS, 

5*6 « , 

5*7,, 

488. . 

589. 


590., 

592. , 

595., 597., 

599,* 

600. 


X 

6 .02, 

60 5 « , 

6 n 9. , 

*12. , 

61 9, 


622*4 

630,, 

638., 648,, 

6*7,, 

667, 


X 

670. 

669. • 

6*4. , 

47*. . 

438. 


392,, 

342, , 

293., 239., 

135, , 

-0. 


X 

-0. 

-0. , 

-0. , 

-o.. 

-o. 



-0. , 

-0., -0., 

-0., 

' -0. 


X 

-0. 

-0. , 

•0*4 

”0 , . 

-0. 


"0,, 

~0« , 

-o •» - 0 ., 

“0,, 

-0. 


X 

-0. 

**0*4 

-o.. 

-0. , 

“0. 


"0,, 

-0., 

“0., “0., 

“0» , 

“0. 


X 

-0. 

-0, » 

-0. . 

-0 • » 

-o. 


-0./ 







DATA 

P<T,10) 

.1 = 1, 

7?) / 









X 

460. 

461 , , 

46?., 

4 65 .i 

466. 


467., 

468. ♦ 

469,, 470., 

472 o, 

476. 


X 

4*0, 

4*4, , 

4*9. , 

49S.i 

500, 


510,, 

519., 

5?3., 52 3. , 

512. , 

349. 


X 

303. 

260 ,, 

209. , 

154., 

-0. 


-0,, 

-0,, 

-0 », ~0 ., 

-0. , 

-0» 


X 

-0. 

“0» , 

-0* • 

“0* . 

-o. 


-0,, 

-o., 

“0•, ”0*, 

-o*, 

-o. 


X 

-0, 

-0. , 

-0. , 

-0.1 

-0, 


•0,, 

-n,, 

-0., -0•, 

-0,, 

-0. 


X 

-0, 

-0. , 

-0. , 

-o. « 

"0. 


*•0,, 

-o,, 

•0., "0., 

-o, ♦ 

-0. 


X 

-0, 

“0 • , 

-0. , 

-0. , 

-0. 


-b, / 






DATA <p<),11) 

,1 = 1. 

7?) / 









X 

330,, 

337,, 

340, , 

34ft., 

350, 


356., 

360,1 

365., 369,, 

372., 

379. 


X 

384,, 

3*8. , 

300, , 

390. , 

380. 


260 . , 

220 ., 

173., 114., 

-0., 

-0, 


X 

-o.« 

“0 • , 

-0, . 

-o., 

-o. 


- 0 • » 


-0., -o., 

-0. » 

-0. 


X 

<*0, , 

-0, , 

-0. , 

"0« , 

-o. 


"0., 

~C • 4 

“0., -0,, 

-0 • 4 

-0. 


X 

•0, , 

•0, , 

- 0 4 4 

-0*. 

•0. 


• 0 * , 

-o,, 

“0* » “0. ♦ 

-o., 

-0, 


X 

■0 • * 

-0 » , 

-0., 

”0 .» 

-0. 


-0,, 

-0*4 

-0., -u., 

-0 •, 

-0. 


X 

-0 , , 

“0 • * 

-0,, 

-0 • ♦ 

-0, 


- 0» / 






DATA (P(t«12) 

,1 = 1, 

7?) f 









X 

250., 

248., 

240., 

250., 

250 , 


250 ., 

250,, 

250., 251,, 

253., 

263. 


X 

266, * 

220 . , 

180, , 

136., 

61, 


-0, , 

-0., 

-0,, -0 • ♦ 

-0., 

-0. 


X 

**0, , 

•0,, 

-0., 

-0» , 

-0. 


-0. , 

-0. ♦ 

“0., ”0», 

•0,, 

-0. 


X 

•0, , 

■0., 

-0» , 

~0 » 4 

-0, 


-0. , 

-0., 

— A • * —0*4 

-0 •, 

-0. 


X 

-o., 

“0., 

-0. « 

-0, » 

-0, 


-0. , 

•0,» 

-0 •, -0», 

-o *, 

-0. 


X 

•0 • 4 

-0,, 

•0 4 4 

-o. , 

-0, 


-0. . 

-0,, 

— 0*4 —0*4 

“0,« 

-0. 
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m _o . . _n . . _n. . -n *. -0 * / 

'lF<HT-tnn6n?,i.'i ’ 

2 DElT=2S.n 
J J = i 

STARTsP.O 
GO TO 7 
1 D£Lt=l?5.0 
STARTs!000. 

JJSA1 

3 no 7 lrjj.72 

I I — 7 

JF (HT-START) <*,■»,7 

7 STARTbSTAR^^'iELT 

WRHFIA.GI H T ,Y0,START,DEI.T 

5 FORMAT (2?HOpPF*SURF OUT 0^ RANGE/4W NTs , E20 . A MH X0* , F20 . <*/7H STAR 
lT=,E20,fl/6M nEI.Ts,F’O.A) 

A RATION ( STA»T-HT )/DEI, T 

no 10 T = I ,12 
T r (NR(T)-I!*1)R,A, A 
a 7(I)=0.0 
GO TO if) 

fl 7 (!! =P UT , T) -RATIO«><P (I 1, H-P U 1-1 ♦ in 

in continhf 

no 70 Tal ,1? 

J=! 

!F(Z(n-Xnl?l, 72*70 

20 CONTINUE 
2 ? FINDaCfJl 

GO TO 75 

21 fino=c n-n*icm-c(i-inaizu-i)-xow(7ti-p-2»i)> 

25 RETURN 
FN0 


* T n FTC DEC* 

FUNCTION OFCAY(P,TP,T> 
nECAY = »<M 1.-T/TP)#FXP(«T/T P ) 

return 

END 
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tgrpiMTinifmiwTij i’ .i igjrMi) 


SIBFTC F!NOT M94,XR 7 

function ftndat(ht,xo> 
niMFNSTON Np(l<Ji,cn9)iP(37,19),Z<191 


DATA 

C,N p /D.04,0,07,0. 1, 

0.15, 

0,2,0 

.25,0.30,0.40,0.50,0,60,0.60,1.0 


X , 1»5 

9 2 1 0 ♦ 

2.5,3.0,3,5,4.0 

,4,5«6«8i9 

,li,13,14,16,18.21,21,22i23,25. 


9(4 in . 
A £. o • ju • * r * 

35*27,27/ 




„ , 

DATA 

(P ( T 

♦11,1=1,171/ 





X300. 

,298. 

,779..240.,195, 

UlO, 

,31*0 

.0/ 


data 

«p t! 

,7),i=i,37)/ 




a g 

X385, 

,382. 

,8?2.,345.,305, 

,253. 

,190, 

,30*0.0/ 


DATA 

(PIT 

.1),1=1,371/ 




- * 

X470. 

,448. 

,*58.,41?,,398. 

, 3^01 

,300. 

,228,,110,,28*0,0/ 


DATA 

<p (r 

.4),1=1,37)/ 





X56? • 

,569. 

.550.,53*.,512. 

,480, 

,446, 

,395,,333.,255,,130.,26*0.0/ 


DATA 

(P (I 

,51,1=1,37)/ 





X658. 

,653. 

,6*7,,630.,610, 

,580, 

,549. 

,508,,458.,402.,342,,256. ,25*0./ 

V 

DATA 

<P (T 

,6),1=1.371/ 





X740. 

,718, 

,730.,717.,697. 

,672, 

,644. 

,610.,568.,520.,468,,405.,315,, 

► • 

X215. 

,2**0 

.0/ 





data 

(p (T 

,7),1=1,37)/ 





X525. 

,8?0. 

,813.,800,,784. 

,760. 

,735. 

,700.,660,,620,,572.,520.,460., 

' a 

X395. 

,300. 

,120,,21*0,0/ 




. 3 

DATA 

(P(! 

e 8) ,1=1,37)/ 





X962, 

,961. 

,959••951,,v38, 

, 91 7 , 

,895. 

,867.,833.,795,,760.,718,,670,, 


X624, 

,572. 

,508,.418.,320. 

1 19*0 

,0/ 




xnoo 

X896. 

DATA 
X1240 
X1050 
DATA 
X1900 
Xl 324 
X15»0 
DATA 
XI730 
X160$ 
X680. 
DATA 
X2350 
X2254 
X 17 30 
DATA 
X2950 
X2848 
X2430 
DATA 
X 3540 
X3480 


•1103.*1100,*1093.»10«0i 
850, ,810. ,760. ,710, ,6*7, 
<8(1,10),T si 
,1242..1241. 

,1015.,080., 

<pn,m ,t=i 

,1490.,1480. 

,1288,,1252, 

0 / 

(P(T.121,T s1 
,1728,,1726. 

,1576.,1544. 

14*0.0/ 

(P(!,13),!sl 
,?34a,.2346. 

,?2?8.»2202. 

.1420.,1000. 

(P(!•14),Tsl 
,294ft.,2946. 

,?8?6.,?804, 

.2250,,2000. 

(P(I,15).Tsl 
,153a,,3536, 

,3460.,3440. 


1067 

590. 


,17) / 


,1234.,1225,il2lO f 

ill92.i 

939.,897.,844.,800 

.i745.i 

.37) / 


,1470.,1460.,1450. 

i 1432 • ♦ 

.1216.,1180,,1144, 

,1108,, 

,37) / 


,1724,,1722,,1720, 

11704,, 

,1512.,1480,il450, 

.1420., 

i37) / 


i 2344,iZ342,i2340. 

,2328,, 

i2176.iZ150,i2120, 

,2090., 

il2*0.0/ 


137) / 


i?944.i* 942.i2940, 

,2926.1 

12782,1^760,i2736, 

,2712., 

,1740.il300,16OO.1 

9*0,0/ 

i37) / 


i3534,i3532,i3530, 

,3524., 

i3420 .i3400»i3370, 

,3340, i 


,1050.,1023,,997,,967.,932,, 
513.,425.,280.,16*0,0/ 


1168.. 1142..1114..1080., 

685.. 607..16,0.0/ 

1414.. 1396..1378..1360., 

1072.. 1036..1000..630., 


1688.. 1672..1656..1640., 

1390.. 1360..1330..1070., 


2316.12304.. 2292..2280., 

2060.12030.. 2000..1870., 


2912.. 2898..2884..2870., 

2688.. 2664..2640..2530., 


3518.13512.. 3506..3500., 

3310.. 3280..3250..3150., 
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X*0*0. ,2940. ,2780. ,2550. ,2300. *2030, »1610.,1050.,7*0.0/ 

DATA (0(T.16),1=1,37)/ 

X4no.*4112*,4114.*4116..4118..A1?0,.411?,,4104.,4096,.40^6,,4080.. 
X4Q&C,* 4040.,'*020, *4^00,, 4980, *3956,,3932.,3908.,3834,,3660.,3750.» 
X 3700.,3580.,3450..3300..3090.♦2860.,2600.,?35C.,1920.«1350.,590.0/ 
DATA (PH, 171,1*1,37) / 

X46«0.,4684.,464©.,4692.,4696,,4700,,46^4.,4686.,4662,,4676,,4fe70.« 
X4652,,4634,,4616,,469ft.. 4580 ,,4560.,4540,,4520.,4500.,4480,,4340,* 
X4320.,4290.,41«0,*4000..3820,,3650.,3420.,3220.,2930.,2600.»2200.. 
X1650.,620.,2»0,0/ 

DATA (P(T,18),1=1,37)/ 

X5230.,6238.,524©.,5254,,5262.,5270.,5266,,526’.,5258..824a.,5250., 
X5232,,6214.,5196.,5178.,5160.,5142.,5124.,5106.,5038.,5070.,4950., 
X4870,,4800.,47^0* *4620.,44 70.,4330,,4140.,3950.•3740.,3800,«3200., 
X2860..2420,.1900.,ltOO, / 

DATA (P <I , 19' ,1 = 1,37)/ 

X5800. ,5806. ,58’ 2. ,5818. ,5824., 5830 ,,582 8. ,5826. ,5324. ,5«?2, ,5.320. • 
X5806., 5792. ,6778, ,5764. ,5750. ,8730., 5 710. ,5600, ,56 .5650. ,8520 . • 

X54S0 .«5400. , 5320., 52 30., 61-’0,» 5020., 4870., 47''9., 45?''.,4)^0. *4040., 
X 3760,, 34 50,,3140.,2770./ 

IF(HT,OF,1009,' 00 TO 1 
DEL Ts50. 

J J“ 1 

STARTsO.O 
GO TO 3 
1 DEL 7 = 250, 

STARTstOOO. 

JJ = 29 

3 DO 7 I = J J »37 
11 = 1 

1F(HT-8TArT)4,7,7 

7 STAR7 = 5tArt-,DEI. T 

WRITE(6,5 I H7,XO,START,DFLT 

5 FORMAT( 26 H 0 APRTVAL T 1MF OU T OF RANGE/4H HT=,E20,8/4H XO=,E20*8/7H 
XSTARTs,f? 0,8/6M nELT=,F20.P) 
a RATI0=(START-HT)/DFtT 

no 10 i=i,J9 

IF(NP(!)-IT*1)9,8,8 
9 7in=o.n 
GO TO 10 

8 7. ( t >=p (17. T)-RATIO* CP (IT ,!) -p (11-1,1) ) 

10 CONTINUE 

DO 20 tsi ,19 
J=I 

ir<ZU)~xa) 20 .? 2 »?l 

20 CONTINUE 

2? FINQATsC(J> 

GO TO 98 

21 FINDATsC. (I -1) ♦ <C (1) -C (I - 1) ) « C l < I -11 - X 0) / 1 Z (I-1) “7 < M » 

26 RETURN 

FNn 
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*!RFTC f"!NOP M94,X<»7 

function ftnoto(HT,XO) 

OIHENSTON NP(7l«C(Tt«pt31«T)«Z(7) 

HAT A t . ki D / n 1 - A le a a a n -■» r a «a m « ... . _ . . , 

OAT A(P(1*1),T-l f 31)/ 

X350,,350,,363,,400.,450.,487,,50C,,495.,430.,350..290.,260.,220.. 

X16Q..17*0,0/ 

DATAIPf1,2),1=1,31)/ 

X555» *540* «535« »565. ,615 < *635», 655, ,660, *450? » 625 e * 580. , 530, ? 4 To •. 
X390.,2«5..145.,15*0.0/ 

DATA (P U « 3),1 = 1,31)/ 

X770. ,768, ,787.,825.,870.,895,,905.,910,,905.,900,,875,,850, ,805., 
X735. ,635.,495.,325.,155.,13*0,0/ 

DATA (PIT,4),1=1,31)/ 

X10A5.,1090..1070,,1090.,1120,,1165,,1205.,1230,,1255.,1280,,1300., 
XI315,,1318.,1313.,1290.,1270,,1090,,965,,835,,705.,600,,460.,300., 
XI60.,7*0,0/ 

DATA (PIT, 5),1 = 1,31)/ 

XI400,,1405,,1415.,1420.,1440.,1465,,1500,,1580.,1660.,1745,,1810., 
XI865.,1905,,19^8..1975,,20^0,,2025,,2040,,2050,,2050.,2040,,2023., 
XI990,,1950.,1890.,1820,,1745.,1600,,1410,,1135,,650,/ 

DATA (P(T,6),1=1,31)/ 

X1812..1832,,1855,,187fl.,1905,,1950,,2000.,2045.,2115,,2200,,2315., 
X?4ft5,,2710,«18*0.0/ 

DATA (P(T,7),1=1.31)/2160.•2205.,2275.,?365.,24fc5.,26?0.,2780 t , 
X2950,,23*0.0/ 

DEL T =50.0 
STARTsn,0 
DO 7 1=1,31 
11 = 1 

IF»HT-START)4,7,7 
7 STABTsSTART+^ELT 

WRT7E (A, 5) HT,X0,5TABT,DFLT 

5 FORMAT(P^hOphASF DURATION OUT OF RANGE/4H HT=,E?0.8/4H XO=,E20.8/ 
X7H START=,F20.5/6H DELT=,E20.8) 

4 RATIO=(STA d T-H t )/nrLT 
DO 10 1=1.7 
!F(NP<T)-IT*l)e,8,8 
9 Z(I)=0,0 
GO TO ic 

a z<n*pu!.n-RATio*{P<ii,i>-p(n-i,i>> 

10 CONTINUE 
DO 20 T = 11 7 
J=I 

IF{zm-XO)20,22,21 

20 CONTINUE 

22 FINDT0=C(J) 

GO TO ?5 

21 FINDT0=C( 1-1) *(C< t)-C( I-l) ) *<Z< 1-D-XO) / < 2 ( 1-1)-7 (I) ) 

25 RETURN 

ENfl 




o <-> r% 


*IAETC PONOD M94«x®7 

FUNCTION POnOOP(H, 0,PO> 
PONOHEs (0. + *»PO 

!F<P0N0nF.r,T.P<'M PONODFspO 

OFTIION 

FNO 


tTOFTC P08BE U94,X»7 

function popRtn(x,po> 

nATA<Ym*TsI*U)/0.0«0,474,0,704.0.*07,0.*67,0.904»0.933,0.95F , 
10,978,0.989,1.0/ 

DIMFNSTON V(11 > 

DO 1 1=1,11 
XlaFLOATM-ll/lO. 

J*I 

if(x-xt) *,?,i 
1 CONTINUE 
? Yl=Y<Jl 
GO TO 4 

3 YlslO. a<Xl-X»R<V<J)-Y IMIUYIHI 

4 POPPFDsVloPn 
RETURN 

END 


YIPFTC THFRML M94.XP7 

FUNCTION FTRF(W,X0,WB,V) 

DETERMINATION "F o PY GIP80NS EQUATIONS 

S = SQR‘f ( X0OX0*H R <>HP) 

S = 5/*>28n, 

A = 2,9«<; 

IFU.GT.PQ.3) A =?0.3 
T = 0.78«EXP f-7,9ioS/V)P(l.<cA/V) 
FIPE=l,04»Wor/ t SOS) 

RETURN 
END 
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r* oo 


HTBFTC RADI 

SUBROUTINE RADTON <w»Xo«HB,Rl,RAOGtRADN) 

DETEBMTHAT'ON hf I ON 17lNft RADIATION IN RAD* FROM SOFT TARGET sTUnY 
D s SQRT IXO«yo*HB<*He* /3. 

< >«*•.< 1 

IF((W.GT,20.0).AND,iW.LE.100«)) GO TO 1 
IFHW.GT. 100. ) .AND. (W.LE,5000.) ) GO TO 2 
jF fW#6T,5n00i> GO TO 3 
GO TO 4 

1 WPaO,6i4#H»M 0 1 63 
GO TO 4 

2 WP30,4A5»W*#1.214 
GO TO 4 

3 WPsO.Q05*W«»ttl .740 

4 AKsl 

iFlHB.lT.dao.ftW^O.AJ'AKsO.GT + O.SattKB/ U80,»W#»0.4) 

RADG= 1 .F9»AKttT,2«WPOEXP 1-0/360.) / (D»ri) 

RADN= 1 ,F9*A*<M 5.5»W«FXP!~D/210,)/1D«0) 

RIsRAUG^RAON 
RETURN 
END 
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*T°FTC GEOM 

SUBROUTINE GFOMCTf<PA t NT ) 

£ mu aij yttij r^j fi7y.r. 7v-vk.i.Yki.c5.«:Ki.5U.^r.5l.c?-Oul 

COMMON/OIK4/ 4V£hT,AVEWT.A' EW*AVFL *HKAX«Al«A2»A3,A4,AStOl»D2»D3»04 
l,05«Kl,w?.W3,WA,W5*<A,ATnT,nlSMAX«DCLTD,rACT5♦FACT?,TVOx<5>«AAA( 5 ) 
2«INDXI»IND*?«r»rRPiN» PO p UN«KtAC5i ♦«£ »C5«»Kt 

COMMON/BLK7/ N*,PERC WI C10) • *>0PRH (10> ♦&UlinW(10> »BROlT(10) •CONPFR 
1(10J«B»LT»WTM0) i p O$PRO<3> »PC-5 p & I ( 3) ♦ NFL < 10) *A ! NT »|_ < ’) « EXPl 110) • 

2PPPEAk(I0j , TwALLT(IO) ,1*7(105 *pERCOA,B U.OHT(10) 

COMMON / n LX 1 3/A VEWT*,R ADG«R AON, DMBO,tlDBO»DWBO «> n HP, I «0WB! *0^011 
1noTON I ,nWlONl.nMJON!.OniONO,OW!ONO«DMlONO 
r 

C CALCUiATF AVERAGE QUANTITIES AND MAXIMUM HEIGHT 

r 

Pls4,«ATAN(l.) 

avfw=o.(i 
AVEL= 0,0 
A VEHTsfi. 0 

avewtb=o*o 

HMAX=0.0 
no 115 1 = 1 «NM 

HMAXeAMAXl(HMAX ♦BRDHT(I)> 

AVEwTBaAVEWTB*BU!l.nw (I) *C0NPFR <!> *10. 

A VEL = A VEL ♦PIL Ot. T(I)«>CONPFRf I»/100. 

AVFW = AVEW + PtlOWI ( ! ) PCONPPR < I WT.CO. 

115 AVEHT = AvEHTt.^lLOHTn ) ^CONFER*! ) 00. 

AVEuT3(sS + SN + f,F4.SW)/A, 

S1 8 < SS■*■ Sai) /?, 

S2 = ( SE + SW) /2 . 

C 

c compute wonr p'Rnt areas and distances 
c 

K A = 0 

PHI = ATAfJ« A ft S ( (GZY-YN? / (G7X-XN) n 

IF (PHI .if . 0. 0 »OR .pH] ,r,E,Pl/2.5 Go TO 154 
Ala Sl*<AVE>,-$l»COTAN(PH!> ) 

IF ( A 1.1. F • 0 • 0T r -0 TO 154 
01= Sl/5IM<PHT) 

A2= ST>S2*0.5«S2oS?«COTAN(PHI) 

02= D!>S2/COS(PHI ) 

A3= S!o(S’pCO t AN(PHI)~52) 

IF(A3,LE.0.0> 00 T 0 154 

03= S1/"TN(®HM 

A4= 5?oGl*0.5*S2*TAN(PHI) 

04= DP 

A5=S2* ♦ AVEW-S2»TAN(PHn ) 

IF ( A5.1 F.0.05 r -0 TO 15* 

05 = S?/'‘OM°HT ) 

AT0T = A1*A?*A3*A4«-A5 
Wl=Al/ n l 










W?aA2/n? 

W3*A3/ n 3 
W4»A4/ n 4 
w5sAA/ n 5 

nl.SMAXsAMA*l C D1 «tl2 % P3 « 04 . ) 

GO Tfl 1S*> 

ISA Al32,oiWTL*S^Sl tt S2 
ATOT = A1^A2-Sl < * <; 2 

< Atl 

nis2,*AvEL^5 ? 

D2=2. tt Avrw^Sl 

Wl=Al/ni 

W2=A2/"2 

ni=oi«»n.* 

n2 = D?«C'.S 
n 3=0 ♦ 

PASO. 

05=0. 

A3=0, 

AA=0. 

A5 = 0. 

n I SMA XsA M AX 1<□1*021 
1 nELTn=n!SMAx/10. 

RETURN 

END 
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c*> o o o d n 


MBFTC BL AS 

SUBROUTINE BLAST(KPRINT) 

COMMON/BIK*/ AVEHT,Avpw^.AVEW«AVEL»HMAX»Ai,A?«A3,A4,A5»Dl»02»D3«n4 
!, 05, V1 ,w?,W3«uA,W F »,< A.A*ot,dI SMAX »DEL Tu» FACT} ,fAC T 2, iNDx l'5) * AAA ( 5 ) 
2. INDX1 ,!NDX?,PFRPIN, POPDNAC SI .REACST.RFACi. v 
COMMOM/BlX6/ p% TQ,pI 4 o0nA 

COMMON/81.X7/ N«:,BEPrwr ( 10 ) ’.P0BILD< 10) «BU!LnW(10> «B!LrLTUO> .CONPrR 
1 (10) ♦BTLrgT (10) tPOSBRoO) «RO$PRI <3>*NFLC10) •Aiwrpt (10) »EX»UlO) « 

2P BREAK f 10) , JWALLT (10 ),!rt( 10) * PE&COA,BU.nHT () 0) 

COMMON/BLX9/ OHB«r)nYB.nw^O.DMTO,nDVTp,DWXTO«r)MTHTO»? u Tl •ODYTJ ,DWicT 
ittOyTH*!,oHp,onYD,ry<rur;MTO % nH.nD,nw,o M 
COMMON/BLK 13/ A VFWT->. p a 00, 0 ADN t DHBO. nOBO * DMBO ♦ OHRI ♦ DOB I . rwp 1 * 

1 no I ON I ,nWJONT «nM!ONT *nr«IONO,OW!ONO.DMTONO 
C CALCULATE percent Of BLAST CASUALTIES FOP EACH TIME TO DFATH FOR 

C OVERPRESSURE 

C 

DHB0=0.0 
00 * 0 = 0,0 
PMRO=C.O 
DHBlso.O 
nDBI=0.0 
im* r-o«o 

outside contribution 

IF(PONA t LE.37.*) GO To 156 
PEROsl.-PFPPTN/lOO. 

PEROsP^RO/lon. 

OM50seiA5TM(PONA)PPER0 
OOBO^BLASTP(°0NA)OPFRO 
riMRO=BL A STM (BQMA! ppFRO 


INSIPE CONTRIBUTION 


pER=PERPTN/1.E6 
no 157 I-1♦NN 

TFfPOBTLP(T).LF.37.sj GO TO 157 
POB = p O n !LD '’) 

OHPIsOHB?*°L A S T M(POO)oCONPPR <I)*PER 
npp I = C n B , * P| . A .S T 0 (P0 P ) oCOnpER (J ) «PER 
fiMR r **■•_» ( p np 1 oC r R < I ) « p E R 

157 CONTINUE 
156 CONTIS'^ 

RETURN 

END 
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Mar?e H 

FUNCTION 0LAftTw<Pj 
0 !*FNSTON P K<21) 

RATA «»k (I) . f sl,2n/3«»0.0,37.5.40.0,A3,5,A7..B0.5.$5..58..6 3.5, 
16#.5,74.ft.7ft,5,83.0,87.5,93.0.100.0,107.5.117, 5 ,130,0/ 
1F(P,LF.37.5) GO TO 5 
i r i?(G“.* j*.i “u TO <3 
DO 1 1*5.21 

!F(P,Gr.l»IC U-l> .ANP.P.LE.P* (I)) GO TO 2 
1 continue 

GO Tft 6 

? PLASTHapK (?.1)*5.«IP-PK|!-1)1 / < PK (I)-PK <I-1>) 

GO TO 7 

5 BLASTHsQ.O 
GO TO 7 

6 BLASTHniOO.O 

7 RETURN 
END 


SlftfTC D 

FUNCTION 61A<5T"(P) 

lF(P,L7.A0.ft) B LASTP=0.0 

IF(P,GF.Ao.O.AN f),P.LT.65.0) BLASTDs35,0 

IF(P.GF.65.0.A K 'D. P .LE.130.0) BL AST Cls-O.5 38*P*70 . 

|F(BLAftTO,LT,0»0) PlASTDsO.O 

IF (0LA5TD.Gr,100.0) BLASTD=10O. 

RETURN 

END 


SIBFTC M 

FUNCTION BLASTN(P) 

IF(P.LT.AO.O) "LASTMsq.O 

IF(P.Gf.AO,O.AMO,P,LE.120. ) BLA$TM=100 f -BLASTH (P 1 -Bl ASTD(P) 

IF(BLAftTM.LT.C.O) BUftTM=0,0 

RETURN 

ENO 
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non 


MP>rTC BlS"S 

SUBROUTINE Ris^is(<PPtNTI 

CU^ M 0 ^' /Pt H l/ T 5*PPE c « p FT5,PD»T0*CnF,Q0,W0U,T8,PBTPi,CC ,: ’ 

COMMON/BU?/ GZX,GZY,XN. y N«SS,SN,SW,SE,Sl,S2,PHI 

C0mmpn/BIi<4/ AVPHT, AVFWT , A VFW. AuFI_ *HMA* , At , A*. * 3 . tu. a *,01 ,D2«D3«P* 
1 1 P5«Wl,w*.W3,W4,W5,* A* Atct« 0I SMAX » DEL TD»FACT! ,F*CT?t *nJJX <5) 1 AAA I 5 ? 
2. I«nx l, ;N0X?.prpP ts‘. PO p ON ^REACSI »PEACST«REACLY 
COMMON/BLKB/ nr '« TO.RI ,«*C»SA 

COMMON/RU7/ NN,PEprwr lie: ‘-^BILDMO) .BUimwi 10) ♦B1LOL T (10) ,C0NPE» 
1 UC> .MTin^I ( 1 O'- . p 05«»Rn f 3) « p OS p PH 35 .NPt f 10) »AINTRl dC) »E XRL (10) * 
2PBBTAK M0> «!WAt. LT ' 10) , iRt {!o; ^FRCOAiBlLPHTdO) 

COMMIYN/hlkB/ D u ^tOnvR,nw^B*? LJ ’0»P , JvT0,pwBTO.nHTHT0«0 UT I»P0YT! ,DWXT 
IT ,n«T H ri .QH[i f o n vn,ovKn,OMTn, r)u,nu.Dw,D” 

COMMON/flLKl <*/!’ T. • T !''',DII.nT 0,^71,FJO.RIT,RIO, TpNI NJ , TP AT A'. , TAI N JR 
nl M E v S’ON AO (3) AP I S) , AR (T) ,a:m 31 1 at <3J ,AU(3) ,PVEU3»10> « VEL (10) . 
lPVPlTMOOO*) ,o?npnH< 10 ) .PROfiprj {10) . o R0B0W<10) »PROPPM!10) »AV<3> 
ri! M E M STON TI VEL c3,10),PRC c I(10) 

OATA <AO(I)* Js’.3)/S,7S»3.(\0.ft33/.(AP(I)tin], 3 )/3»1, 33/ , <AR(I),js 
11O)/1.0,1,S*,S.76/,tAS'*),1=1,3) /n.2*»0c667,2.63/, <AT<I),J=1,3>/ 
23.14,0.A33,0.5S/,<AU(!5.*=1 ♦ 3//8.&7,6.32,6,57/ 

PATA {tvlll.I=l,3)/S,,3..2.5/ 

CALf.CLATP «LAsr DISPLACEMENT EFFECTS ON OUTSI0F 

iPRINTrO 
no 5 1=1,3 
no 5 .(= 1 , 1 " 

PVFl U ,.))="." 

no 5 <= 1,10 

S P VEL I t.J, 1,0=0.0 
PD=P0NA 

no so 1 = 1,3 

IF(pnsopO(T).LF.o.o) GO TO 50 

IPRINTsl 

HSAOH ) 

XL=AP(T) 

WDTH=AP<!) 

ALPrAS ( I) 

GAMsAT 11 ) 

xjsAum 

FTA = AV 1 1) 

CALL D’S p LA<M,vl.wDTH,ALP,GAM, xJ,ETA,nELTD,VEL,XPR!NT) 
no iso j=i, in 
PVFL (I ,J)=VFL < J > 

ISO CONTINUE 
SO CONTINUE 

TF( .NOT. (KPRTNT.Gr.o.AND,IPRJNT.GT.O)) GO TO 66 
WPITF * A. 7. S t) 

1 Si FORMAT '<*0H00"TSI0E PEOPLE VELOCITY MATRI X (FT,/ 5 FC)/9H0DI STANCE, 7X * 
1 ANSI A\in JM G , 9X. 7 mS ITT TNG, 9X,5HLYING///) 
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r» r»ri 


0D*0 # 0 

DO 153 J*1»10 

DDanr)-*.r>rtTO 

IF (KPR1NT.GT.01 WRITE (6. 152) OD. (PVEl<I»J).1*1.3) 
15? FORMAT (iw «AFU,6) 

153 CONTINUE 


CALCULATE blast displacement effects ON INSIDE OF buildings 


c 

c 

c 

c 


59 I PR INTaO 

DO 190 1*1»N M 
pd*pobtld<1) 

DISMAX*AMA*1 (61LDLTU1 .BlLDWliin 
DELTD=ni5MAx/lD. 

DO 91 J*l .3 

IF(POSPRT(J)« L r •0 • 0) GO TO 61 

IPRJNTal 

M*AO(J) 

XLsAP(J) 

WDTHsAPIJ) 

ALPsASIJ) 

GAMrAT <J> 

XjsAIM J) 

ETAsAv <J> 

CALL D1SPlA(H**l»WDTH«AI.P«GAM«XJ*ETA*DELTD«VFL»KPRINT) 

DO 161 JJsl.10 
PVELI (T.JtJJ)*VEL<JJ) 

161 CONTINUE 
51 CONTINUE 

IF<.NOT.UPRINT.GT.O.ANO.IPRINT.GT.O)) GO TO 160 

WRITE <6.16?) I „ 

16? FORMAT (3?H0lNS!DE VELOCITY MATR IX I FT,/SEC J/UMOBUILDJNG TYPE.I3/9H 
10DISTANCE.TX,8HSTANDING«AX .7HSITTING.9X.5HtYTNG///) 

00*0,0 

DO 760 J=1.1D 
ODaDP^nFLTn 

IF (KPRTnT.GT.01 WPITEI6.15?) OD.(PVELT(I♦JJ»J>*JJ = 1*3> 

760 CONTINUE 
160 CONTINUE 

calculate percent of blast casualties for EACH TIME TO DEATH FROM 
TRANSLATION - T ndoors 

Tl 1*0.0 

DHTsO.P 

DDYT=0,0 

DWKTsO.O 

DMTHTsO.0 

DO 163 1*1.NN 

DO 163 J*1i3 
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no i^3 jjs 1110 

*»vcon=pv p l * < r ,.i» jj> 

°VC0^Ss8 T pAN<i (P VC^N) / IOC. 

AV|fPRD=P''S'*«! ( .'>*rOM»rP. (!) »PVC0NS/1.F5 
1 ISPCONIfPVC^N)/ion. 

IF( PVC^NS.GT.0.0/ TIsl,0- p VCOM$ 

T I T = T I T + T T *»<HPb T I I > & * 

- - 1 < - w -L-rii I, 'Ul/iltJ 

iF(PvcoNS.Lr.o.rt) r,n to 1^3 

T I r!»^2" J »*? T * 0 ‘ 0 * AN,r * PVCOS5 * l7 »°* 1 > so Yn 1** 

li ! V £''^'.SE.°.l.AMr'.pv c 0NS.LT,0,5» GO TO iftf 

I. (PVC rt NS.r,r ,o. 5 .^r > in <pvC( , Ni s LT q 9) 50 Tn 

nHT = PHT-*Av/Fpo r - * lo 

GO TO i fc 3 

166 nMTHTaPMfH T + AVFPor 
GO TO lft3 

166 owkt = dwkt^avfp c, d 

GO TO ift3 

16? nDYT = DnY T «-Av r P e n 

163 CONTINUE 

I^lOHT.GT.1,0> DHTrt.n 

iFiDnvT.r.t . 1,01 OPyT^i.c 
IF<BWK*.GT.1.G) OWK^si.o 

lF(DMTMT,f,T. 1 .0) nMTMTsi.o 

nHTi = nwr*pr«3PiN/ioo. 

ODYTIsnnYTO’PRniM/lftO. 

nWK T!sn W KT« P cqo IN/100. 

DMTHTIsDMTHTePFftPTN/loO, 

TIIsTIIttPEPPTN/100. 

CSSUaLT,ES F0B E «- H TI "E ™ UfATH FOR 

TIOsO.O 

OHTrO, ft 

nDYT=0,0 

n , *'V'=G.o 

OMTHTrn.P 

no lfft 1 = 1,3 
00 i** j= 1.10 

P VLs p y ru U , j> 

TIVEI. (T »J! = P 0 C K ’! 'Pvt)/ioO. 

166 PVFL H . j) =BT°A‘\S (»vl) /10O, 

HO 1 A 9 1 * 1 ,*^ 

°»ORI(I)=0» 0 

PB.OBTlHt DaO.O 

PROPPED p sO.p 
ppoe^w m = 0.0 

P90PPM H > =0 . rt 

DO 169 J=10 

ANPyfLsPVEL (J .7)PPOSPRO/j)/ICO, 


■ 










ANPVEL2AWpV£L«U.-PfRPtN/l00.1 
TJsTtVfl. IJ.I) 

|FCPV£l tJ«l).GP.O.O) Tlsl.O-PVft<J,!) 

PRO0I {t)epRO*!* I)*rI»P05PRP(J> »(1.-PERPIN/100.>/100. 

if tpvii (j.n .gf.o.si go to ito 
ir .pvel(j, n,G r .o.si go to i ti 
! f(»VEl(J«T).GE.n.l) GO TO 172 
IP (PVF 1 . < J« 7 ) • G r « 0 ♦ 0) GO TO 173 
SO 70 U9 

170 PROP0HmsPROB r H<n«'ANPVPL 
GO TO 169 

171 PROnODtiisPROB^n (!>•*• ANPVFL 
60 TO 169 

172 PRORDwmsPROBPwm^ANPVEL 
GO TO 169 

173 PROROM(I1s p ROB r1 M(T)*AMPVEL 
169 CONTINUE 

IFU.A.FQ.O) GO TO IPO .. 

OELTOsamAxI (01»D2)/19. 

OELTSsnELTO 

01»01"P. 

D2*D2»?.-Sl 
K AAsO 

lF(Dl.f,T,02) KfA-1 
IF(KAA.FO.O) GO TO 1 
DELTOsni/in. 

INOX1*10 

INDX2=n2/nl»10.f0,B 
GO TO X 
i n£iTO=n?/io. 

INDX?slO. 

IN0Xlsni/D?<UQ.f0.5 
3 !F(INQXl•GT,10) INOXlslO 
IFUNDX1.LT.1) INOXlsl 
IFUND» 2 ,GT. 10) INnX2=10 
IFUNDX2.L T .1) INDX?ai 

FACTl=T1FLTn/AT0T9Wl 

00 174 INDsl.lNOXl 
T IO=T I O^PROBT UNO) *FAc71 
nHTsnHTfPROBOH UNO) «FaCT 1 
DDYT=00¥T'tPROBOD UNO) *FACT1 
OWXTsDWKT4.PROB r 'wUNO)«FACTl 

174 OMTHT=PM^HTt- p R r 'BnM( JNn) «FAOtl 
FACT?=^ELT0/ATnT»W2 

00 175 IND=1,1*0X2 
TIO=T1C+PRPBI(IND)»FACTZ 
DHT s tihT + PrOBON UNO) *FACT? 

ODYT s DOYT*.«*ROBnn (I NO) »FACT2 
DWKT*0WKT'fPROB n W<INr)*FACT2 

175 DMTHT*0MTHT*PRPbDM(IND)*FACt2 
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D£LTO=nri.T<i 
60 ro 1fl «> 

IftO DEL T ns amax 1(01«n?,o>,p4,n5>/10, 

* » l r> U J 4 . , M 4 t , «*_»..*, *• 

1 ' > 1' * ' Hi: ll[. lr L • J ■»• •) ( -> 
TNi r 'y«2i=n^/[)C(_'rQ^n t ^ 

INpX<3)ss r >3/D e 'lTD«-R.5 
TN^X < sf'4/r,Fi. 1 'r)4.0. S 

!NpX < 5) sD5/p r L To + r, 5 
AAA(1Jawl»OELTO 
AAA (?) sirf?*DFLT r * 

AAA ( 3 ) rw?»0£<. T” 

AAA(4)swAeOELT^ 

AAA (•») sw5»PElT n 
^0 l?l 1=1,3 

f AC TsAAA<I>/ A T rt T 
TN'OFXaTNOX < r ) 

*^( IML'FX«G T . 10' I^!PFX = 10 
TF< !MllFX,L' r . 1 ) JN0F*=1 

DO 181 I M’ t )s i, JNOE t 
T 10 = T I'■>*'> H Oft T ( T N J)^r AcT 
nHT = n HT* e R^flnH< J NP)ACT 
DDYT=n r 'K' T + D R^bPl} < TNT) OF ACT 
DWK Ys[)wK T * B R r, B n W < IMP) ofaCT 

T ft 1 DMTHTanM T H T *PR r, RDM( !Nn)«FACr 
185 CONTINUE 

OUTsl. o-peRptn/ioo, 

lE(OMT.GT.nuT) DHTrOlJT 

IFinnYT.6T.0UT> nPYT=0UT 

T F ( DWKT . A T . 0')T ) PW<TsO'J T 

IF(PMTHT.GT.^LIT) riMTHTsOUT 

DHTOsOmt 

DDY TOsPflYT 

PWK TOsnuX t 

DMTHTOsDMTHT 

OD=0.0 

RETURN 

END 
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r> r* r% 


i 

*!RFTC DIS?L - 

SUAROu*JNE D T S°L < M • *t•v«IOlH«ALPHA,GAMMA»XJCG»ftA,OFlTD»vEt«KPRJN 
IT) 

PFQPlE displacement 

*=- & 

COMMON/DUO / Y $, PRff , Pf TS«P<3 «TO« CDF, Q0»W0U*TB4P6 TP* COB 
DIMENSION C<121«Y<2),YP<2)*YPP<2)♦YQ(2)«YQP<?)*YR<2)»Y«P<2> 

DIMENSION V£L ! 1i 
301 KPLOTsn 
FF* 100 « 

n “0 • 0 

ci*o,o 

WEIGHTs160» 

XMIjsO.4 
COPsO.5 
CDOs-0.5 
*D=1 

FDlSTsDELTO 
IP05-0 
IPOSUO 

lF«VWin T H.GT f A,0) IPOSsl 
PIa4,<MT«NU, ) 

DTa.OOOl 

ANIJSATAN I ALPMA/H) 

RXY=$QRT * ALPMAoAl.PHA>H<»H) 
iFtlPOS.FQ.l) °XY=M 
IFIH“XL/?.)3»4*4 

3 SsH-Cl/2. 

go rn n 

4 SsXL/2. 

11 PHIsATAN(ALPHA/GAMMA) 

XJ“XJCO + WET&HTMAL°hA»AIPHA-*GAMMA<»GAMMA) /32,2 
D0=H/2.*01 

PREE 3 2.«» p 0 w <T.»lA.74’4.«P0) / <7.*14.T+PO) 

0=00 

E0sl44,»PRFE«XL«H 
Q0=5./?.«POtt«»0/(7.ttl4,7*p0> 

Us1138»*U.+6.«P0/(7.#14*7) >»«0.5 
TS=3.»S/" 

TBa|VWTDTH>FTA«S)/U 
TM*AMAX1< TS.TBl 
T$TO*TS/TO 
WOUsVwIDTh/U 

pFTS°PO»Ui-TST0)*FXP (-TSTO) *CDFoQO»(l,-TSTO) *«2®£XP <-2.»T$T0) 

TBOTOs <TP-WOD)/(TO-WOU) 

PBTB=PO*(1,-TbOT0)«eXp (-TBOTO)*CDB*QO*(1.-TBOTO)«»*2*EXP(-2»«TBOT 
10 ) 

XMsWFIGHT/32.2 
XTTEST*0 


* ? 
I 

L 

4 
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XLfiaSQOT l ALPHA*»2*&AMMA«m>2) 

NL =50 
KOUNtpsi 
iT^C'ri&aG 
KTZEP0=0 
PT = F0 

■f c 

C SET VK* COFFFIClFNTS AND INITIALIZE TIME 

r 

C<1»=DT/?. 

! C<2)P1. 

C(3)*C(1) 

C (5)=l,-SQRf<0,5) 

'1 C(4)=C(5)»0T 

C(6)*CI4I 
C <«)«2*-C(5) 

C(T)=Cf5l»nT 

C!9>=C<7) 

CdOtsnr/6* 

C(11>S0.T3T3333 
C (12)*0(1) 

• t=o.o 

EPS=DT/2, 

] IF (KPRTNT.LE.O) GO TO 30 

WRITF<6,7) 

7 FORMAT(1H ,4WTTME,*X,4HPRES,8X,4HV <1),BX,4MY(?),8X,5myP( 1),7X,5HYP 
1(2) ,7X.6HyPp(1) ,6X,6 HyPP<2)/12X»?HXH,10X«3MXHD.9X»3HTHP.OX»3HXCG.9 

2x.4HXCr,n> 

C 

C SLIDING Awn TIPPING COMPUTATION 

C 

*> 30 DO 140 1=1,2 

YU)=0.0 
'? YP(I)so,n 

J YQ(I)=0.0 

140 YQP(T)=0,0 

-« MOTTONSI 

i 40 IF(ITMOHG.NE.O) GO TO 73 

IF ( (T + FPJ ) .GE.TM) CALL CHTTMF(C.FPS«ITmCWG,DT) 

73 DO 141 Xs1,4 

l IF(X-l)142,142*143 

J 14? IF <T,E0.0,0) G n TO 143 

PFTTsPFT(T) 

*t PBTTssPBT ( T) 

J FT=144.o(PFTT-PBTT)»H»XL 

143 X3=3»X 

X2SK3-1 
I Kl=K3-? 

•* IF (IPOSl.EO.l) GO TO A 

ifc.nqt. nPos.F<s.i.ANn»Y( 2 ) .ir.o.on Go to i? 

] 


1 

1 
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Y <?)—0*D 

YP(?)s0. n 

YQ(2>«0. ft 

YQP(?)sq,o 

IP0SU1 


1? RETAsPmj-v(2) 

YAsKLRo C ^s<BrTA)fyHt)*XLR<»S!N(fiFTAJ 

Yfis«P?-X M l)»wr!«.Hr}/vM,.w L& HY P «2}«ya{ 2 «*,w MU H C( 5 S} . CTA } =5!fi , f8 P ?A j5 

YCsXLR*C0S(8FTA) 

YD2XJ/XM 


0=(H/2,♦r1i*COS < Vi?)i♦«vwiDTH/2.-B)»5!Wi¥ <2 n 

Yes(F , T«D-rtnGHY<»xl.P«S|N(PETA1 ) /XM 

YPP(l)s(YBOYn-YE«YA)/<YD-YA«YC) 

YP® (2> s (YBOYC-YE) /(YAflYC-Ytl) 
lF(yPP (?) .tT.O.O,ANr>,T«EQ.O.O) MOT tONs-1 
A IF( IPOSl ,EO. 1 ) YPP (1 >sFT-XMu<>3?,2 

IPdPOSl.EO.U YPP(?)sO,0 
XHSY<1)+PXY*.SIH(Y(2)-ANU) 

XHD=YP(l)fPXV«YP(?)»C0S(Y(2)-ANU) 

YHOsPX YoYP < 2)«< tN(Y(2)-ANU) 

THt)s5QRT( XHn»XHn*YHn«YHD) 

XCG=Y(1)^XLR»STN(Y(2)-ANU) 

XCGHSYP(1)♦XLROYP(?)<*COS(Y <2>-ANU) 

IF(K»Nr.l) GO TO 16 
IF(kPRTmT.iE.O) GO TO 125 

WOJTC(6,6) T» FT « Y(1)«Y ( 2 )»YP(1)«yP(2),yPP( 1),YPP(2>,XH» xHDtTMD»XCG 
1« XCGO 

6 FORMAT (1H ,FA.4,7(lX«Ell.4)/1H , AX ♦ 5 (1X »E 11.4) ) 

125 CONTINUE 

IF(JPOSl,EO,1,ANn.THO.LT.10,0,ANO.YPP(1),LE.0,0) GO TO 19 
IF(MOTI0 N .L T,0) GO TO 21 
23 IF(AAS(Y<2)).GE.PI/7.) GO To 15 
20 iF(XCGn.iT.O.O) GO TO 19 
IF(XH.tT.FOIST) GO TO H 
VEL(»fD)=Tnn 

KDsKD+l 


FDISTsFniST^OELTO 
IF(Xn.GT.lO) GO TO 1A 
GO TO lfe 

21 IF(YP(2).GT.O.O) GO To 2? 
IF(KTTFST.FQ. h r,0 TO 20 
GO TO 2.3 
2? XTTFSTal 
GO TO 23 

19 DO 24 listen ,10 
24 VElUDsO.n 
GO TO U 

15 T)0 17 M*XO*lO 
17 VEl(1 1 )sTHO 


GO TO tft 
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rv r» n -ft o on 


If *0 562 1=1.2 

rR(n sr(Kl> «vpri>-c t«?)ovQ c r) 

Y < J)=Y t I>♦Yft ( 1 ) 

YQ ( n svo U * ♦ (I) -C (IC3) «YP c ! ) 

YRP U > *C <K t)*YPP(!)-C(K2> *YQP {») 

T r { J i a. Y P i i » ■» V ft = < J ( 

5f? YQP (I) sYOP < v ) O.OYPP (I )-c (53) «YPP (J) 
GO T0IU6.U! ,14ft .141) «K 
146 T:r+r||| 

141 CONTINUE 
GO TO 40 
1« RETURN 

ENH 


*!BFTC PF m94,X°7 

P U N C TI ft N PFT(T) 

PRESSURE ON FPftNT FACE 

COMMftN/BLKl/TS.PREF,PFTS.PO,TO,cnF,Qft,wOU»TB«PPTn,CDR 
IF (T-TS1 1,J*,2 

1 PFTs(PrrS-RREE)»T/TS+PREE 
GO TO 5 

7 IFCT-Tn)3,4,4 

3 PFT = P0« ( 1 .-T/TO) »EXP <-T/T0> *CDF<H70* (1.-T/TOHm>2<>EX*» I-2.«T/TO) 
GO TO f 

4 pFTsft.n 
f RETURN 

END 


T 9 FTC PB M94,XP7 

FUNCTION P«T(T) 


PRESSURE ON RACK FACE 

COMMON/BLKl/rS.PRFF.PrTS.PO,TO,CnF.OO.wOU.TB.PBTB,COP 
IF(T-wnil) 1,2,2 

1 PBTsO.ft 
GO TO f 

2 IFIT-TP)5,4,4 

3 PBTsPBTpo(l.-(T-TP!)/(W0U-TB>) 

GO TO f 

4 IF(T-TP-W0U)5,T,7 

5 PBTsPOc(1(T-WOU)/ < To-WOUl)«EXPI-(T-WOU)/(TO-wOU))♦ CD<3»G0» <1(T- 
1W0U)/(TO-WOU)) <M>2»pxP(-2.R <T-WOU)/(TO-WOU)> 

GO TO f 
7 PBTsO.ft 
b RETURN 
END 
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*I8FTC CHTtM m*»4«XP7 

SUBROUTINf c^T^HE «C.EPS*!THCHG,DT> 

dimension cm 

0T=0,0! 

EPSsO.no*; 

t til / 1 LJ l~ _ « 

i • ■ - ^ * ■ yj — i 

CtUsDV?. 

C(?)S1,0 
CO)sC(l) 

C(S)sl,-SQRT<0.5) 

C<4)eC<5)*0T 

C<6>»C<4> 

C<3>s2,-C<M 
C(7J3C<8)*nT 
C <9> =C <7> 

C (10)=PT/<», 

C <111*0. 13 * 333*3 
CU2)=C(1) 

RETURN 

ENT 


SrRPTC BT 

FUNCTION BTRANS (PACVEL) 

pacvfl=a«scpacveu 
IF(PACVF l- ? S»)1,1.3 

1 BTRANS=O,0 

2 RETURN 

* IF<P«CVEI-B5. 

4 RTRANSs1 no, 0 
GO TO ? 

•> IF (RAC VEl.GT.2*;.0. AND, PACvEL. LE. 31,0) BTRANSel,6T«PACVEl-41.B 
IF(PACVCl•GT «31.O.AvD.oACvEl.lE.41,0) BTRAN5*»,0»PACVEL-236. 

IF (PACVEL . GT. 4 .0.AND.PACvFl,lE,55,0) BTRANSaO, 715 o PACVEl*60,6 
|F(8TRANS.IT.0.0) BTRANSsO.O 
IF(BTRAUS.r,T. 100,0) BTRANS*100,0 
GO TO ? 

END 


SIBFTC PCON 

rUNCTin N pCONI(V) 

C INJURY C"RVe FOR BLAST TRANSLATION 

PC0NIr?o,«V-?0n. 

IFIV.GT.15.) PCONIslOO, 
IF(V,LT.10.) PCON1*0,0 
RETURN 








*t*FTC DfB» 

SUBROUTINE DF.BMStKRftINT) 

*- - u tt Vii. ^C-CklAQUi^r*^! 

COMMON 

COMMON/M.KV W.HR,VlS,XO*FFR.A!^f , EN.!SEASN,TOt)4V 

POmmon/H'.**/ AvEHT*AVEWT.AvEW*AvFL.HMAx,Al,A2,A3,A*.A5«01,M.D3jC 

l,05*WUw^W3,W6,W^KA,ATOT.0!SMAX ; nELTD«fACTi*r«i.,«.,«u-^.> 

2 % IMDX1 «!^UX?<FFrP1N» poPDN.REACSI*REACS.*REACLY 

COMMON/Rl'lCT/ N^PFRCWI UO)'POBRDClO) .BUILDwtlO) »BIUnLTilO) «C0NP£R 

2fBRt»K HOI. |W*ILT 1101.1(111101.»E»CO».MLDHTtlO) 

issss^52J 5:s"Si”™«'55fs:ia??s*.sss?o:s«THTo.DNT,.» n vT,. 0 «T 

IT .PMTHTt ,nHD«nrivn,DWKI1,0MTr', PHiDDiOW^DM YAtKitD 

.ss^sihissisai^KSS- 

2«PROBDW{10) ,®Rft«DM(10) »RADIUS<9 > • J Jj^onnMD {101 

DIMENSION PP^B^ntlO' iPRORD* < 1 0> «PR0BWD<1P> «PP0BMDC10> 

DIMENSION ®R^B!C1C)*PROBJ!<10) f amamwt i t. n 

nATA (PAni.'SCn ,!«1.9>/1..2.«3.,*..5..6.«B.tl0..i2./«<*M«ANHT<U 1 |) 

l t jsl,3) . JsT .■)) /5.7b,3.76,0.Ci3.76«5 tt 0.0/ 

c COMPUTF DEATHS DUE TO OUTnOOR DEBRIS 

TMAX*S(SflT(HMAX/l6.0B5) 
lF(KPRtM T .f-T.05 WRITE <6,302) TMAX 

in? formatmphomax t mum time of debris fi.ight,fi 2 , 6 ,ah stc> 

c OUT5!OF HEARTS PROM 0UTSI0<- WALLS 

IF ( < A . FO ♦ 0) r, 0 TO 5 
AT0TsSt«S2*2,*<S?.«AVEW*Sl*4VEL > 

WOTHsAvELoSlNT^HTT^AVEWPCOSCPH!) 

AGLTsS1RSIM(OHI5*S2*COS(RH1) 

DEL TTlsAGLT/10« 

GO TO * 

S o e L Tns AM ft Xl <^1 »D2 iT)3*D4»fl5) /10» 

imdxc n=nwnEt T D-o.s 

CALL TPAJ( w *PO w A»PAD»D!ST ,TMAX«VF.HT 
INnX C2)="2/DElTD*0.B 
INDXC3T sOa/DFlTO^O.^ 

!NDX(4'= n 4/DEl T 0 4 '0»5 

INnX(5)=n5/D F L T D*0.S 
AAA<1 >=W , .«OELT r > 

AAA(2)sv,?<»nELTP 

AAAC.OswToDELTP 

AAA(4}sw4nn£LT r ' 

AAACOswMPElTD 

(S CONTINUE 
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o <1 r>r» r» nr» 


DO 21 Tal«10 
PRORTimsO.O 
PROBHD(I>=0.0 
PROBDY(1)30,0 
PR08WDH ) =0,0 
21 PROBMI)< 1) sO, n 
n i r»so s ft 
DHO=oio 
DDYOsO.O 

DWK0=0,0 
DMTDsO.O 

PEROUTsi,-PERPTN/lOO, 

CALCULATE DISTANCE,VELOCITY yS, TIME RELATIONS FOR EACH SIZE 

DO 200 1 = 1,9 
DO 211 Il=l«NN 

lF(PPEPTB(IL«n .GT.O.O) 00 TO 212 

211 contjnhf 

GO TO 230 

212 RAr)=RAntllS( I) 

DO 205 J=1 * 10 
PROPI(J)=OtO 
PROBDH(J)=0,n 
PR0BDD(J*=0,0 
PROBnw(J)=0,0 

205 PROBDM(J1 aft,0 

IF(KPRTNT.r, Tf C > WRITE (6,30 ~>l R AQ« MI 2 « Dl ST < I! I) ,VEH <1II) ,111=1.100 
1) 

3fl3 FORMAT(lfHOPARTICLC RADIUS,F10,2/39H0DEBRI $ DISTANCE-VELOCITY RELA 
iTI0NSHTPS/5HnTlME.7X«4HD!ST,9X,8HVEL0ClTV/(ix,i5*3X*F12,2,9X*Fi2,2 
2 ) ) 

FOR FACH INCREMENTAL DISTANCE,D0WNRANGE»OBTAIN AVERAGE VELOCITY 
AND RANGE af TTME (RANGE OF INITIAL HEIGHTS) TO GIVE THIS VELOCITY 

DO 920 J=l»10 
DISTTsFlOATIJ)«DELTP 
IF(DISTI(GT,PIST<100)) GO To 920 
lF(DISTI, L T.niST(l)) GO TO 20i 
DO 202 K=2«100 

IF(DISTI .LT.niST(K) t ANO,DlSTI.GT,OIST(tC-l) ) GO TO 203 

202 CONTINUE 
201 VMINSO.O 

VMAX=VEH<1) 

VAVE*VMAX/2. 

TMINsO.O 
K = 1 

GO TO 20A 

203 VMAX*AMAXUVFH(K) ,VFH(K-l) ) 
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a o n o r» 


VMTN=AMiMl(vFHU)«VFH(ic-n) 

VAVE = ( VM.Ax*v‘^I m ) / 2. 

TMJMsTmAX/?. on.'^L^AT * K - 1 > 

o « A TMyiTW»v/if\n_ttr^rf.r(»; 

FOP r AFH B"!lD*NG TVof Amo EACH TORSO POSITION FIND THE MAXIMUM 
PROP. of O'Atm f.ACH tjmL TO Df A TH CAtaGoky FOR EAOM i AiCR SHE NT AL 
niSTANCF 

TO A?0 L=1*NM 

TF (PONA.L T.o»er A K; d) ) GO T n A?P 
NFLS=NFL <L) 

FKTsRIIOHT'L)/ r LOA T (NFLS) 

no ?o 

IF(TMI*J.LT.0.2403) no TO 21 7 
GO TO ?10 

217 pVElAsAmAx W*D r BPnvAvE«wAU,n *6PEPPE t VAVE»RAO.2> ,BDF8REtVAVE,RAp, 
13) ) 

P VEL INsAMAX! ( BTRAM1 ( VAVE«>? a D» 1) •P’fRANI < vAVF.o Ar!»2) »BTRANJ (VAVE»«AO 
1,3) ) 

V IM J M x s P V E L IM 
AMAXRPsPVELA 
GO TO ?13 
219 AMAXBP = (5.0 
VlNJMXrO.O 
00 109 N=1,3 

NF=BlLnHT(L)-A M AMHT(M,N)*l. 

HO 20'* < = l,N r 
HTF = X 

TH=S0RT(MTF/16,OPS) 

IFITH.LT.TMIM) r ; n vn 20R 

PVELAcnnEBRE CVAVE,RAD,N) 

AMAXPP = AMAX1(PVEL A,AMAXfiP) 

PVFL INs«trAnt (VAVr.RAn.N) 

VINJMX = A M AX1 fPVEl. !M*VINJMX) 

IF(TH.GT.TMX) no rr 19 R 
20A CONTINIIF 
19° CONTINUE 

213 IF<AMAXRP.LT.0.0) AMAXRP=0*0 
PVELA=AMAx«P 

nOEft = PVPLAPCONPFR(L)»pOsncO(M)oppERTB(L,I)/1.Ep® <1»-P£RCWl<L)/IOO« 
1) 

IJlNjsino.-PvFlA 

IF(P V L LA.L r .O.O) PIMJSVINJ^X 

PROP! (j)sPO0 n I'J>*niMji>rCK!PER<I)«P0SPR0(M)*PPERTB(L»T)Xl.E8»( l.-PE 
1RCWI<I)/10".' 

I F ( AM A X BP , 1 T . l n . ) GO TO 2 1 l> 

IF(AMAXP»*V. T,50.) GO TO ?07 
IF(A m AvRo < i_t.90») :-o to 2Q* 

PROBDH (J) s D R n B r 'H i J) +0DE8 
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non 


60 TO ?o 

20B PROBDDfJ)sPROBno(J)*DDEB 

60 “0 ?Q 

207 PROBOW (J) sPROB^w U) ■‘•DOEB 
60 TO 20 

210 PR0BDM (Ji sPROBDM < J1 ♦DDES 
20 CONTINUE 
0?0 CONTINUE 
P20 CONTINUE 

DO 22 JbI,1o 

PROBTI(J)sAMAX1(PROBII (J),PROBI(J)) 

PROBHD(J)sAMAX 1<PROBHn<J)* p ROBDH<J) 1 
PROBDYU'sAMAXI (PROBDYU) «PR0BDD(J) ) 

PROBWD(J>sAMAXl(PROBWDU) ,PR0BDW(J) ) 

22 PR0BMD!J>sAMAX 1< B PO p MD(J),P r0B0M<J>) 

200 CONTINUE 

IFUA.FQ.O) GO TO 216 
FACTlsnELTnttWDTH/ATnr 
DO 176 iNnsiaO 

DIO=DIO*PROBII UNPJ «FaCT1« p ER 0UT 
DHD a DHO+PROBHOUND) 4»FACTUPER0UT 
DOYnsDOYn+aROBOY <!ND) «FACT1*PER0UT 
DWXDsDwXn+PROBWDdND) *FACT1*PEP0UT 
176 DNTD = D M TP*PRf'B M D (IND) »FACTl®PEROUT 
60 TO 220 

215 DO 216 1*1*5 
FACT«AAA<I)/ATnT«PEROUT 
INDEXstNnxtn 

DO 216 INDsl.P'DEX 
DI0a010+PR0BiniNDl*FACT 
DHO s nHD+PROBHD(IND)«F ACT 
DDYD*DDY n -*PRnBDY (IND) ®FACT 
DWKD*DWKD* p ROBWD <1 ND) ®F AC.T 

216 DMTDsDMTD*>PROB M D (IND) ®F ACT 

INSIDE DEBRIS FrOM OUTSIDE WALLS 

220 TMAXsl.O 

DO 30 TsiaO 
PROBI I (DsOtO 
PROBHD M) si)»0 
PROBDY(I)*O,0 
PROBWDmaO.O 
30 PROBMD<I)=0.0 
DIIsO.O 
DH*0,0 
D0*0.0 
DW*0.0 
0M*0•0 

CALL TOAMAT(W,PONA,1.0«DIST,VEH,RADIUS,PPERTB,PPERTI,DISTM,YEHM> 
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no 224 j=l«9 

nr) >•> i ysi.in 
PROB! <10=0.6 
proroh r k) so, n 
PSOROD f <) sO . ■* 

PRORPv, <0=0.0 
2?1 PROR^M '0=0.0 
RAT)-PA,nin$< j) 

no ?R 0 i=i«nm 

IF(POMA.LT.pwRFA*(!).OR.PP r RTB<1»J).IE.0.0) 60 TQ 250 
DElTn=f x^l 

alfnsa^axi t (n .bildwt < i )) 

IF(IWALLt <!),£0.0) nELT0=AtEN/]0. 

NFLR*NFt < I' 

FHTsBH DWT f !) / r LOAT (NFLS) 

PO 2?3 <=1.10 
niST?=FLOAT(<)*0ELTn 
IF(PTST1 f G T . n lSTM(J,100)) r 0 To 250 
IF ( D1 S T J •L' r .DI5T M <J*1> ) 60 TO 22 ? 

00 225 0=2,10* 

JFfnI ST T.LT.01STM(J,KI) .ANO.niST!.ST.oiSTMfJ.Kl-l)) 60 TO 22A 

225 CONTINUE 

22? VAVF=VFHM<J«l>/2. 

TMIN=0.0 
K 1 = 1 

60 TO 227 

226 VAVE*<VEHM<J,K!)*VFMm<J,k 1*1)>*0.5 
TMINaFl.OATUT-1 ><>TMAX/100. 

227 TMX=TMAX/100.“FLOAT<<T) 

00 223 M= 1.3 

IF (TMlN.t T.0,071<»77A4) GO To 22R 
GO T<n 22P 

2 2A PVELAsAMAxl (ROFRSf (VAVF.HA0,1) .BOEnRF (vAVf.,BAD % 2> »RT)FBRE <VAVE.RAI), 
13 ) ) 

AMAxP'PsPVELA 

PVFL!N=A m AX1(RTPANI(VAVE.RAo.1;,BTRANT(VAVF.PAD»2).PTRANI(VAVE«RAD 
1.3) > 

VlNJMXsPVELIM 
GO TO 233 
??«> AMAXRP = 0.0 
VINJMX=0.0 
DO 235 N=1.3 

NF=(FHT-AMANHT(M.N))«12.+1. 

IF (N r . l.F • 0) MF = 1 
DO 234 KKK =1«NF 
HTFsFLHATOTKtO '12 • 

TH=SOHT(HTF/16.065) 

IF (TH.LT.TMIM) GO tq 234 
PVFlA=nnFRPF(VAVF.RAD,N) 

AMAXRP=A«AX1fPVFLA.AM axBP) 
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n on 


PVELTNsBTRANT <VAVE,RAD,N> 

VINJMXsAMAXI(V T N JMX ♦ P VEt1 N > 

IF <TM,r,T,THx) GO TO 235 
234 CONTINUE 

S3? C0"7 ;*v-t 

233 IF(AMAXflP.lT.0,0> AMAxBPeOtO 

nDKBsA M AXB p *CCf'PER (I) oPOSFR I <M>pPPERTB (I, J> /I,E8« (1 .-PERCWI U > /100 

1 .) 

0DEBaDnEW/l0,*nELT0/ALEN»10. 

PVELAcaMAx«P 

niNjsiOO.-PVELA 

IF <PVEl_A,lF.n,ri) niNJsVlMjMX 

PROBI (K ISPROM (lO*D!Nj»CONPER<I)»PO$PRI <M) »PPERTB It ♦ J) /1 # E9* <l *-PE 
1RCWI(I)/1O0.)*nELTn/ALEN#l0. 

IF<AMAXRP.LT,10.) GO TO 24^ 

IF<AMAXBP.LT,50.) GO TO 247 
IF <AMAXftP.LT»9 n «) GO TO 24* 

PROBDH(X)=PROB n H(K)♦DOE8 
GO TO ?23 

24* PROROD IK ) sPROBTID (K) +D0EB 
GO TO 223 

?47 PROBOVg(x) =PROBnw<K)*DnEB 

GO TO 223 

240 PROBOM<K>sPRO0nM(K)*ODEB 

223 CONTINUE 
250 CONTINUE 

DO 31 Hrl,10 

PROBII(K>=AMAX1(PROP11<K)» P R0B1<«>» 

PROBHD(X)sAMAXI(PPOPHD(K),PR0BDH(K>) 

PROBCY(K)sAMAXl(PROPOY(K)«PR08DD(K >) 

PROBWD(K)aAMAXl(PR0RWQ(<)« p R0BDW(K>) 

31 PROBMDOOsAMAX! (PRORMn (K 1 ,PR0BnM(IU > 

224 CONTINUE 
FACTsPFRPlN/ion, 

DO 249 jsl.10 

nii=nn*pROBU (jh»fact 

DHsOHfPROBHDUloFACT 
DDaDO+PROBOY(J) pFACT 
DW*DW^pROBWD(J)pFACY 
249 DM*DM>PROQmd( J)*FACT 
245 DO 32 J=1»10 
PROBII(J>=0.0 
PR0BHD(J> sO.O 
PROBDY(JlsO.O 
PROBWD(J>=0.0 

32 PROBMD(J)sO«0 

COMPUTATIONS FOR DEBRIS FROM INSIDE WAtlS 
DO 254 J a 1» 9 
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o o rt 


DO 251 K=l,10 
PROP!Of>=0.0 
PROfiDH(KisO,0 
®ROPODOO= rt .O 
PROP n * <K * =0.0 
251 OROBDMU) so, 0 

M A t“l-0 Antlltt I A 

r^. i w r tM i 4 . ' i_* » *» * 

no 50 T r1 ,MN 

IF <PONft .l.T.pPpFAK <I) . AND.P0BM.DI 1 > .6T.BPFHAS.AND. HALLT< 3 ) ,NE.O.AN 
in.PPFRTT f I , J-, ,C*T.O.O» GO TO 51 

IF (PON A .5T,PPR r A< < I ) . ANf) . POnA . GT, BRKM AS , AND ♦ !WALLT< I j . N£ . 0 . AND . PPE 
1RTT tIo>«GT.O.O> 00 TO 5? 

00 TO *0 

0 

C OUTSTOF WALLS n 0 MOT FAIL " OUT INSIDE MASONRY WALLS DO GO 

C 

51 PP = POflTl.n ( T ) 

WRJTEU»35)> I 

151 FORMAT fAlHOIMSTDF DFRRIS FROM INTERIOR wALLS«B(JILDING» I 3) 

CALL TdamaT (W, t, P»1.0«DlSTAVEH»PAn!US.PPERTl «PPERTI«DISTM1,VEMM1) 

IF (KPRINT.RT .O.AND.PPFRTI (I * J ) , GT. 0.0) WRITE (5»303> PAD, (I NOISTmI 
i cj*ii » .vfhmi t j * i n «?i3i«io'J> 
no 2*3 1 1 s1 * 100 
no 2*3 jjsl*R 

DISTM2f JJ,TI)=niSTMl (JJiUI 
?4.3 VEHM2(JJ»IT)3VFH M 1 (JJ,in 
GO TO ?44 

OUTSIDF WALLS GO ANO I NS IOt MASONRY WALLS GO 

52 DO 2*2 11*1,0 
DO 2*2 Jjst,10" 

DISTM2MI ,jj)aniSTM(II,JJ) 

24? VEHM?(I I.JJ)5V r HMUI«JJ> 

24* DELTHsAINTRL m/10. 

ALFNsAMAXKBILnLTm «RILPWT<!)} 

NFLS=NF| ( I ) 

FHTsBIt DHT(I)/FLOAT{NFLS) 

DO 253 K = 1«l ft 
DISTIaFL n AT(K) # DFLT!l 

IF(D!STI,GT.niSTM2(J*100n &0 To 50 
IF<DlSTI.LT.nISTM?(j, 1)) GO TO 255 
DO 255 K!=?,100 

IF<DlSTl.LT.ni«tTM2<J.Kn ,AND,DISTI,GT.DiSTM2U,KI-l»)60 TO 257 
255 CONTINUE 
?55 VAVE»VFH M 2(Jil)/2, 

TMIN=0.0 
K I * 1 

GO TO 25* 

25? VAVEs(VFWM2<J*Kp*VFHM2lJ»KI-l) 1*0.5 
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2*>6 


TMtNaFL04T(KT-1)«TMAX/100. 
TMXstMAX/10o.»FLOAT<KI) 
no 253 MSI .3 

IF(TMIm.LT. 0.07197704) Go To 266 
60 TO 9^9 


?6a i ^ELAsAMfl X l (BOPRRF( V AvE.RAU»i) .BBEBRF(VAVE.RAQ.2) ♦ OnfBRE (VAVE.RAp, 
AMAXBPePVEL a 

PVEL.TNsAMAxi(Bt R ANI<VAVE.RAD,U .BTRAN! (VAVE.rAD.2) .BTRAn! (VAVE.RAD 
1.3)) 

VINJHXsPVELJM 
60 TO 273 
269 AMAXBPbO.O 

VINJMXsO.O 

no 270 N=1,3 

NFs (FHT-AmAnHT(M.N) ) <* 1 2• 1 • 

TF(NF»LF.01 MFsl 
DO 274 KK<=1,NP 
HTF=FLOAT(t<xt<) /12. 

THaSORT(MTF/16.066) 

IF(TH.LT.T^IM) GO TO 274 
PVFLAswofbpe(VAVE.RAD,N) 

AMAXPP=AMAX1(PVElA.AM aXBP) 

PVFLINshTrAni(VAVE.RA n.N) 

V INJMXsA M AX1(PVELIN.VINJHX) 

IF(KPRTNT,GT.0» WRITE(6,400) M.N.TMIN.TH.TMX.HTF.PVElA.AMAXBP 

400 FORMAT * 33h M,N,TMIN,Th,TMX,HTF, pVELA,AMAXBP,2I5,6El4.5> 

IF(TH.GT,T M X) OQ TO 276 

274 CONTINUE 
276 CONTINUE 

273 IF(AMAXBP.LT.O.O) A M AX6PsO.O 
PVELAsAMAxP P 
niNjsino.-PvEL* 

!F(PVELA.L r .O,0) DINJSVINJMX 

PROBI (X)=pR0PI(K)+niNj*C0NPERU)eP05PRl(M)#PPERTi (i,j) /1,E9«(ALEN- 
1FXRL U) ) /At EN 

ODEB»A M AXBPttCONpER(I)»POSPRI<M)#PP£RTI(I♦J)/I,E8 
nDEBaUOEP/l0.°(ALFN-EXRL(I))/ALEN 
IF(KPRTnT.GT, 0) WRITE(6,40l) K »M,AMAXBP,PDEB 

401 FORMAT(16H *.M,AMAXBP,DDFB,21 5,2E20.8) 

IF(AMAX1JP.LT,10.) GO TO ?76 
IF(A M AXfl D # LT» 50 ,) r,0 TO 275 

IF(AMAXBP,LT,90,) GO TO I 
PROBDH(X)sPROB^H(K)♦DnEB 
50 TO 253 

1 PROBOD (-K ) sPROBOD (K) ♦DDFB 

50 TO 257 

276 PROBDv((K)sPROB n W(6)*DDFB 
60 TO 253 

276 PROBOM(K)sPrOBOM(K)♦D nEB 
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?53 CONTINUE 
50 CONTIN"e 

00 33 *sl,(C 

PROP 11 (K>sA»<iAX1 (PRO» IKK) *PR0Bt (K) ) 

»R0nH|,»K) :ma X ’ ( PR0*HD < « } ♦ »ROBnHK> ) 

PRQBOY(<i sAmAXI(PRO*Dy(K)«PR0600(K)) 

PROBED (IdsAMAXI (PQOftwnjlM . Pdqbhu jru 
33 PROBED <K) s^Mftxi (PP03HD(t(j ,»R06 Dm<»C) > 

lMOCKuJililJ? 0 ’ WRITE<6 ’ 400 <K»RR°BHn<K>,PROBOY(in,PROBWPCia,PRcr 

^0? FORMAT * in «I5«4E20.fl) 

?5A CONTINUE 

FACTspfrb fM/100. 

no ?.fi jsum 

DI ! = m »4PRPBT I (J) #r ACT 
DHsDH>PRnQMP(j)»FACT 

DOsnn^pROHny(j> <*fAc r 
nw=nwfpROBwn«j) opac t 

?77 nM=D^*PROB M n«J)oFACT 

return 

FN0 


*tpe t c trama 

SUBROUTINE TRAMAT »W,Pn,TMAx,ni5T,vFH t RAniUS,PRESSO,PRESSI,DlSTM, v E 

1 HM) 

COMMON/BLK 1 / NM.PERCWMIO) ’POBHOdO) «BU!IT)W <10) «61LOLT d0) ♦CONPER 
1 U 0 )«BTl n wT(i 0 I ,Pr»s B «0(3) ♦ PQSPRI ( 3> *Nf L <10> ♦ AINTRL (HO) ,EXPL(l 0 > « 
2PBRFAK f10) ♦ tWALlT (10) , iBTdO) »PERC0A, BiLDHT (iQ) 

OIMENSTCN OAni'JS(l) fVCH<«. ) «D!ST(i) t QlSTM|9«100) ♦VEMMfO, 1 n 0 } ,PRESSO 
ld0»9). PRESS 100*9) 
no i isi *9 

DO 1 Jsia^O 
DISTM(T,J)=0.0 

1 VEHMd.jlsO.O 
00 A Irl,g 
RAPaRA^IUSd) 

DO 2 J s 1 ♦ N N 

IFIPPEssT( l,T).GT.O.O.OR,PRESSO(J«I).GT.0.0) Go TO 3 

2 CONTINUE 
GO TO u 

3 CALL T9AJ<W.P0.RAn,niSNYMA x ,VEH) 
no 5 jsi,ioo 

DISTM (!,J)sdTST(J) 

VEHM(I *J)sVEM(J) 

5 CONTINUE 
A CONTINUE 

return 







'» C BP 

FUNCTION BnEPRE<VFL.RAD.IPOS) 
niMfNSlON PRO0 <3,3,21) 

DATA (PftftR*1,1,1 ) ,I=l,2l>/90.,96,»100.,105..109.,113.,117.,121., 
1125*,l?fl,,131.,134,,137,,139.,142.,144.,146»,l48»,150,,153.*l60./» 
2(PROP< 11 1 , i =i ,2i > /2t. .51. ,34. , 35. .36. ,37. ,37.8,35.5* 3*?. 540 = 2 = 

341.. 42..43..44..45.?,46.5,47.3»49.0,5l.,54,,59./,(PR0R(W3»I),1=1, 
421}/?5,,?9.5*31.0,31.A,3,.0.32.5,33.0,33,5,34.,34.5,35,,35,4,36.0, 
536.5,37.0,37.5,39.0,39.,41.,44.,50,/ 

DATA {°RHr f2,1,1>,! = 1,21>/7?.,81.5,85.,99,6,94,,98,,102.5,107., 

1111.. 115.5.120..125..130-,135,,139.5,144,,149.,154,,160,,165.♦172. 
2/. (PROP<?»?,!).1 = 1,21)/25«,29.,31..31.2,32,,32.5,33.,33.5,34.,34.5 
3,35. ,3*i. 5,36. ,36.5, 37., 37.5,38,, 39,, 41. .44. .46,/ 

DATA (PROft<3,l,I),1=1,211/99,,106.,113,,120.,126,,131,,137.,143., 

1149., 1*^5., 160., 166.. 17?., 178,, 184., 187,5, 190., 193., 195., 198,, 200,/ 

X , (PRO 

28(3,2,1),1 = 1,2t)/36.«40.,4?.5,44,,46,,48,,50.,52.,53.5,55.3,57., 

359.. 61 .,62.5,64.5,64.6,68.»70,,72.,74.,78./,<PPOB< 3,3,1),1 = 1,21)/ 

424. ,29.,81 31.5,32., 32.8,33.2,34,,34.3,34.8,35.,35.2,36,0. 37.0, 

537,5,34.0.38.7,39.2,41.,44.,49,/ 

lF(IPOS-?)1 ,4,6 

1 IF(RAD.FO.I.O) GO TO ? 

JF(RAU,£0.2.0) GO TO 3 
J*3 

GO TO 9 

2 J = 1 

GO TO 9 

3 J = 2. 

GO TO 9 

4 IF(RAD.FO.T.O) GO 10 5 
J = ? 

GO TO 4 

5 J = 1 

GO TO o 

6 IF(RAO.EO.1.0) GO TO 7 
iF(RAD t FO.?.n\ GO TO 8 
J = 3 

GO TO o 

7 J = 1 

GO TO 9 

8 J = 2 

9 IF<.NOT.(VFL.LT.PR0*(IPOS,J,1))» GO TO 10 
BDEBRE=0.0 

GO TO 13 

10 DO 11 k=?,;u 

IF<VEL,GF.PROP(IPOS,J,X-1)-AMD.VEL.LE.PROB(IPOS,J,K)) GO TO 12 

11 CONTINUE 
BDERRE=100.0 
GO TO 13 

12 BDEBRE = 5,» F L0AT (X )-5.<> <P90<3 (IPOS,J,F)-VEL) / (PROB (IP05 * J ,*> -PROB (IP 

10S,J,K-1)) 

13 RETURN 
enti 
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$ IRFTC OTrI 

function BTRANI (V,OA0»IPOS» 

C INJURY CURVES POR ?LA$t DEBRIS 

Tr<Tf>05- ? ) 1 - 2 . Ji 

1 !F(KAD.LP.lIo> go TO 4 
THPAD,L'’.?.") GO TO 5 
AMs7,7 

Bs-fc4. 

GO to ]o 

4 AMs4,0 
R=-2fcO, 

GO TO 10 

5 AMs2*>, 

B=-GP0. 

GO TO io 

2 TF(RAU,l c .1.0) GO TO a 
AMsf,67 

Rs-6#!.^ 

GO TO 10 

6 AMs3,4* 

B^-165.5 
GO TO 10 

3 IHRAD.LP. 1.0) GO TO 7 
IP(RAD.L r .2.0) GO TO 
AM=6,67 

B-"G0, 

GO TO 10 

7 AMs 2,04 
Rs-102, 

GO TO 10 

p AM3«5 t 2* 

B=-«4.7 

10 BTRANlBAM*V*n 

IF IRTRANT.LE.O.0) PTRAN 1*0,0 
IF (BTR AN? .OF,100.01 RTRAN!=100. 
RETURN 
ENn 
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r» f-> 


tlBFTC TRAJE 

SUBROUTINE TRAJ(W,OVRPR,on,olST,TMAX,VEH) 

Tn COmpmTf n^RDtj trajectories 

COMMON/Piuco/L I ^T1 (M iLIST2<9) «LJST3<31) «II STS(9» «L ! ST6 (7) ,LI ST7 (9) 
i»iS<TP(6i«L!ST«{'n,ABETA,!Ac 

DIMENSION Dist <J),VFH(1) 

PRFXP=?.?547 
TMEX»so,S9?7A 

PRFCTs 1.72E9M 100. / WHx> (-pREXP/3 » I 
TMFCT=7.S3Ao39^E"S w (100./W)««<TMEXP/3 .) 

RNGs(OVRPR/PRFCT) ^<M-I ,/RRExP) 

DT=TMAX/SOO. 

K 0 U N T s \ 

FTaTMAy/U)0. 

RAD=RD/1?. 

PROVRsnvRpR 
AR6=1.0 
DEtTAT=0,0 
XDOTsQ.o 
DISTX=0.0 
SIOMAXsO.O 
TIME=0,0 
SUMSFvsO, 0 
TSTAR-fl .0 

IF(APETA.LE.O.O) A0FT As360.«RAD 
7 REFPapRFCT* (RNO + SUMSF v^DFlTAT ) #<> (-PREXP) 

REFSFven?0,«SCRT (1.♦S.*REFP/103,) 

SUMSFvaSIIMSFV + PFFSFV 
CAPT*s tmFCT«(RNg*S!GMAX)#«TmEXP 
RHQsO.OflO ( <7.-*F.*»PR0VR/l4,7)/ (7.*PR0VR/14 # 7) I 
WINDV=«>3,4*PR0VR/SQRT (i,*6,*PROVR/103.) 
nuM=wiNnv-xpoT 
IF <DUM1 3, 3,4 

3 C = -1.0 
GO TO 5 

4 C=1.0 

5 PETAa-CttARPTA/RHO 

consti=arg 

C0NST2»ARG/BETAo(XPOT-wJNDV) 

DlSTY=OfTA*AL0G(ARG) 

DE17AT*DT 
TlMEsTTMf*DT 
IFITJME.GE.FT) GO 70 9 

A ARGa <C0NSTWC0NST2«nELTAT) tt EXP (WlNDVRDElTAT/BETA) 
DlSTXsnETA*ALOG<ARG>-niSTY 

X DOT= (CONST i*»w I NPV+CONST?« tBETA*nELTATuwINDV) ) / (CON5T1*CONST2*DEIT 
1 AT) 

XOLD=STG M AX 
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SIGMAXsSIG^AX+DTSTX 
SYAPPsorFct# fR M G^S!GMAx)** <-PREx p > 

CTAOw-t i *»r\ « e r« ft t m ^ t waOa / i rt« \ 

v» ■ • * • — a •- w * ■ ■' *• - « * i t • i; # •• »; i « 1 r f * vji ♦ 

TSTAOsT^T A p*nF_|.TAt- (StGMAX-XOin) /STARV 

pRDvo=RE:rR«n ,-tstao/capt) °exr(-tstar/capt) 

IFfpoOvR.LT'.O.nj PRnvRsO.O 
GO TO ? 

9 niS*UOllMT>sSir.MAX 

VEH CCO'.'NT) sSORT (XnO r PXDOT*l03A.91PFTPPT) 
TF^O^'T-lOOl 6^,64,64 

63 K0UNTsxqiinT*1 

ftsft*tmax/ioo. 

GO TO ? 

64 RETURN 
FNH 









SIBEK THER M94,XR7 

SUBROUTINE THERM(KPRInTI 

COMMON/BLK2/ G7X,GZY.XN,YN,SS,SN,SW,SE,S1,$2,PH1 
C0MMQN/BLK3/ W,HB,vIS,XO,FFR.AIRPEN,ISEASN,TODAV 

COMMON / in, K<*/ AVEHT,AVEWT,AVEW,AvEL,HMAX,A 1,A?,A3,A4,A5*D1,D2,D3,D4 
l,05iWl.W?.W3,W4,W5,KA,A70T.D!SMAX)DELTD,FACTl,FAeT2,INDX(5>*AAA(5) 
2,INDX1,INDX2,PFRPTN, POPDN;REACS!,REAC$T,REACLY 
COMMON/BLK6/ PO, TQ.RI.pONA 

C0MM0N/8LK7/ NN.PERCWI<10)IPOBIL0<10> *BUILDW{10).BILDLT(10),CONFER 
1(10) ♦BTlOWt (10) «PO$PRo(3) ,P03PR|(3) *NFLUO) *AiNTRL 110)*EXRL<10) » 
2PBREAK(10) *TWALLT(10) ,1BT<10> ,PERCOA,BILDHT<10) 

COMMON /9LK11/ WALPAN(IO),WALOEN(lO>,EL0RTH(10)*FLORnN(10)*ROOFTH< 
110)«R0OFDN(10),BASETH(10> *BA5EDN(10 )iSOILDN(IO)«S 1LHT(10).PERSCR(1 
20) ♦PERSGdO) ,PErGG( 10> ♦PERUeS(lO) ,PERG(10) ,PEROE (10) ,PERGGS(10) 
COMMON /BLK 12/ DOYTH I , f)WK T* I, DMTTH 1, ODYTHO,DWK THO, OMTTHO 
COMMON/ALK14/TTI,TlO,DII,D!0*F!l,FlO,RII,RIO,TllN!NJ,YFATAL»TAlNjR 
DIMENSION NT(3)* A(3)* ADE(3>.ASCR(3),AG(3),ASG(3)«AGG(3),A6G$<3)tAD 
IBS(3)♦ARrAO(S),DT ST <5)«AOUT(5)»RADEX (7), 

2 AgURN(7),PKT(7), ARB 

3URN<2,25) «PK<2«i) ,PPK (3*15) *PKDEM(3»4> *PK$RM (3,4) ,PKGM (3,4) *PK$GM(3 

4.4) ,p<GGM<3,4),PKGGSM(3,4)»PKDBM<3,4>,PKDEw(3,4>,PKSRW(3*4),P<GW(3 

5.4) ,PKSGW(3,4)*PKGGW(3*4),PKGGSW(3,4),PKDBW(3,4>,PKDED(3.4),PKSRP( 

63.4) ,PrGD(3,4),PK5GD(3,4),PKGGD(3)4),PKGGSD(3,4>,PKDBD(3,4), 

« PKTM(3,7),PXTW(3,7),PKTD(3,7),PKTD0(7),PKTW0(7),PKTM0(7),TKM(3,0) 

9, TKW(3,4),Tk0M»4),0(7),TIME(4) 

DIMENSION tki(3,4),PINJ(3,7) 

DATA(ARBURN(2,II),11*1,13)/O.*16,i16,»16,,16,,16,,16,«17,5)33,,55. 

1.77.. 96..100,/ 

DATA (ARRIIRNM, II) ,11 = 1,18)/0,,6.,6. *6., 6, ,6. ,6. *6. ,8, *15,5*24, .35. 

1.48.. 61.5.73.,*6,,96,,100,/ 

DATA(PK<11),!I«1,17)/0.,3..6,)10,*19..31.*45.,56.,65.5.74.2,81.5.8 

27.. 91..94.5.97..98.5.100,/ 

DATA<PP<(1,IT> *11*1*10>/0.*6.2*16.3*29,5*33*8,34,3*2,5.0,*0, ,0./ 
DATA(P»x(2,11)»I1*1,10)/100,*89,5*75,«60,,31,5,43,5,28,5*23.5,14,, 

10 . / 

DATA(PPK(3,11),II*l,lC)/0.)0,«5.,ll,5,l6,,22,,47,5,60.*82,tl00./ 
DATA(TIME(IJ),IJ=1,3)/2,,6.,10,/ 

DATA(HT(I)* 1*1,3)/5,76,1,58,1,0/ 

106 FORMAT(3H0As»E15,8) 

90 FORMAT(1X,4(E15«9,2X)) 

91 FORMAT(7N0RADEXs,El5,8) 

92 FORMAT (7wOABURNb,E15,8,2X»5h PKTs,E13.6> 

56 FORMAT(19HOTOTAL DEAD IN DAya,E15.8,20H TOTAL DEAD IN WEEK B ,E15.8, 
121H TOTAL DEAD IN MONTH®,E15,8) 

54 FORMAt( 6H0TlMEs,E15,8,2 X,?Hq*,E15»8) 

46 F0RMAT(31H0PFRCENT KILLED OuTSIDE IN DAYS,E15«8/32H PERCENT KILLED 
1 OUTSIDE IN WEFk*»E15.8/33H PERCENT KILLED OUTSIDE IN MONTHS,E15,8 
2) 

?5 FORMAT (14H1BUII.DING TYPE.I3) 

FIIsO.D 
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Q(4)bT* 

XO»XO 

TMAxsn.n^3«sr)pT iw> 

TIMf(4)sTMAx 
00 51 I J*1«3 
TOT«A X = T T Mri i i j) /THaX 
IF(TOT m aX,GT.10,> 60 TO 52 

51 OllJIs TQ*prRCTH(TOTMAX) 

NQ*4 

GO TO *5 

52 NQsIJ 
QMJ!«Tfl 

35 PDYTHsn.O 
nwxTMso.n 
DMTTHsO.O 
DO 190 1=1.NN 

IF(KPRTN|T, GT»O' WRIYE(b«25> I 

Xl3SGRT<PE*eWlU> / 100 . 1 ®(BUnW! (I)#COS<PHI)*Bl|,nLTm«SIN(RHn) 

HP= 20. 

CTNTHSXO/HR 

tantm=hb/xo 

WINnnw=lO.<>SORT(PERfwi (I) /100.) 

THETA= ATAN(XOZHB) 

SPWsSILHT(T)♦WINDOW 

da vs(D10A1*D?«A2*030A3*D4»A4*D5«A5)/ATOT 

IF( .NOT, (KA.GT.On 60 TO 1 

DAVs(SloAl<*STN(PHn+52*A?oC0S(PH!)) / (Al*SIN(PHI) ♦A2*C0S(PH!)) 

1 CONTINMF 

HSHAnEa(AvEHT-TAMTH«DAv) 

IFlH6HAUr.LT.0.0) H 5HA0E =0,0 
FLHTsoTLnHT(I)/FLOAT<NFL(!)> 

FLOOR SsH5HAnE/FHT 

KFLOORkFLOORS 

XFLOORsKFL^QP 

IFlHSHAnr.LE.(XFL00R#FLHT*5PW>) GO TO 10 
KFLOORsKPLOOP+l 

10 XNFLSNPL II 1-*FLOOR 
DO 3 11=1.3 
A (II)an, 

!F(CTNTH»SPW,LF.EXRUn .ANO.SlLHTin .GT.HT1I!) ) A 1 II ) aCTNTH«XL* (HT 
1(I IJ+WTNPQW) 

IF (CTNTH#S P W.LF.EXRL m.A nD.SILHT (!).LE.HT(II)) A (II)»CTNTH*XL<>5PW 
IF (CTNTH»S«*W.6T,EXRL (I) ,AND.SILHTm*CTNTH,LE,EXPLtn .ANB.SILHTd) 

l.LE.HT(II))A(II)sFXRL(I)«XL 

IF (CTNTH*SPW.6T,EXRL (I) .AMO.SILHT (I)ttCTNTH,LE.EXRL(I) .ANP.SILHTU) 
l.GT.HTU!) ) A (I T >=XL«(FXRt. (I) -CTNTH«M SI lHT (I) -HT (11) )) 

IF (CTNTH«SPW.GT,EXRL m .ANO,SILHT(I) OCTNTH.GT.FXRKI) . Ann. SI LHT (1) 
l.LT.HT(IT)) A(ti)spxRL(I)*XL 

IF(CTNTH*S p tf.GT,FXRL(I).AND,SILHT(1)“CTNTH.GT.FXRL(I)•AND,SILHT(I) 
l.GE.HTMT) .AMn.SlLHT(I)-eXRLll)*TANTH,LT.HTUI)) A (11) sXL* (EXRL < 1) 
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2 :i?Jk HT<T, - HT< nn*c T NTH> 

IFdPRINT.GT.O) WRITE(6.106> A < 11 > 
AIIaA(TI)*XNFL 


ADEj 11) sAn*PE»DE(! > 

ASCR Scr ii) 

AG <11)aATI*pfRR(I) 

ASGdl) sA!t*eeesGU) 

AGG(!IisA1!»©c D GG(I) 

AGGS(1f) sA!I* pfRGGS(I) 
ADBS(in*AT tttpr e ne S ( I } 

IP(KPRINT.GT.O> WRITE(6«90> 
3 CONTINUE 

AA«AVEHT*CTNTH 

AREAO(lJ«Al 

AREAO(?)aA? 

ARPAOnisA - ' 


AOBS(II) •AGG(It) ,ASCR<1!) «ASG<II) 


AREA0(4)sA4 
AREAO(S)sA*S 
OI5T(l)oni 
DI5T(2)*02 
HIST(3)a03 
0I$T(4)rD4 


"ISTtSisns 
DO 12 tis 1.5 

AOUT(IT)s(DlST(JZ)-AA)*AR£AO(11)/DIST < J J) 
IF(AOU T (II),LE.O» > AOUT(I I> »0» 0 
12 continue 

IF(KA.fq.o) GO TO 203 

AB=AA 


AAaBPoSIN(PH!) 

AOUTUi =(Dl«AA)*Al/ni 
AArRBocOS(PHI) 

AOUT(2)=<02*S1-AA)»A?/(D2-»S1> 

AOUT <3)s-SlPSZ 
AOUT< 4)aO. 0 
A0UT<5i sO.O 
203 KKOUNTsO 
K*2 

RF!N»22, 

RCHA*lf. 

DO 40 jsl«NQ 

IF(KPRTNT.GT.O) WRITE (fe»54) TlMEU)»Q(J) 
RADEXU)ao(j) 

RADEX(?)3Q(j)«,fc7 
RADEX(3 )cq( j)»,56 
RADEX (4 )«sq(j)*, 37 
RADEX <B)aQ(j)«, 3 l 
RADEX(A)*Q(J)».2l 
RADEX(7)»0,0 
IF(W,LE.32000,) GO TO TO 




*»•* 


; 1 
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1 9 6 

70 
i26 
13 

12 ? 


16 


17 

1" 


IS 

19 


60 


21 

2 ? 

41 

23 


^0 1 ?5 , .* = T,7 

RACF X '' Ml = »4CfK!! . ' , / ( ' 

60 TO ?3 
DO 1 ?6 I Ms! «7 

R A U E * t l. M I S^U'J^K , *• U'' , • • : / t w «V . ^ .1 

IF (KPft!NT.r,T. o* W9--F ■ 6.'-■ 1 fJ. M > ♦ L*«sl«7) 

LG = 7 

no i ?i t M s’:• 

11 = : 

DPFa?, 

0®A0r4, 

np.o=6. 

IF(RAOFX'L*MGo ’a 
!F(radfx'"^),gt.rcha; go •». 

IF<RA0r x . _m> ,GF,4,.AMr.RA"' > 50 TO 16 

IF (RACFx (*.«> .GF.6.. AVn.oAOFx .v, .(.".“SCMA) 60 T f) 15 
DIFFa (OAngX (LM1 -OR AO? / ; ORA^-O* t.T 

ABIJRN 11.Ml sAr«*'J»n<<, * I > *0JF' o' Ar>?> V' ■ y «I T* 1» -ABRUPT <K % ! ! 
GO TO 19 
ABIJRN(L M '= 0." 

GO TO 92 

ABIJRN <|. Ml sl7.5*3.6?*(RA0FX<L M )-eC u *’ 

IF (X ,Eo.1 1 ABU»N<LM)=I6.6*?.74*fC' * f L M)-RCMA) 

IF <ABU9N'L m ! ,G t . 100. 1 ABURN <l*) = • CO. 

GO TO 19 
A8URM(LM)rOC^A 

if(abu9n<lm),eo.o,> go to ?2 

IF(ARUON<LM),G r ,«0.1 GO T 0 4l 

11 = 1 

DRF=5. 

ORAD=0, 
orAD= 0RAn*nR r 

IF(ARUON<LM) .GF.ORAn.AND. AP'JRV.L' -rFAD) GO TO 21 
ORAD=0°AO*nR r 
nRADsO^AO-fORr 
TI«I T ♦ 1 
GO TO 60 

DIFFs( AB'Irm tLMl.ORAD) / (DRAO-ORAD) 

PKT(C^)= p K< II)*DIFF*(p< U1*15-?* (II) » 

GO to ?3 
PK* Ml= n ,0 

0 • 7 3 

P-* 1=100, 

IT «TN!T.GT.O> WRITE (6 *92) ABIJRN ClM) ,RKT (IM) 

’ 5 4 RN(lM),L7, 10.) GO TO 24 
’f r f)i , . , s\( L H) ,GF, 45,) 60 TO 33 
T J = i 
!!»! 

ORT-S, 

OR A ram. 


\ 
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DR«DBOPAn*D«E 

IF(ABU»N(L«).Gr,10..AND,ABURN<LH).LE.25.) 60 TO 26 
!F(ABUPN<LM),6T,25.,AN0.ABURN«LH).LT.30#) 60 TO 27 
JF(ABUPN(LM) .GE.30.,ANO*A8URNaM) .LE.35.) 60 To 31 
!F(ABU0N(LM).6T,35 ..AnD.A8URN(LH>.LE,36*5>60 TO 26 

• r i iik.iM.iit ui ft » «< k in n tfiiifikio ui i r .ah. \ r.n y a tii 

1 f '1 ' U / ■ W w v —• • 

II***? 

DRADS48. 

DRE*5. 

ORAD«40. 

26 IFUBUPNILH) .GE.ORAO.AND.ABURNILM) ,LE.DRAD> 60 TO 29 

ii«n«-i 

0RA0*0»An*nRE 
JO DRADsORA"*ORE 
GO TO 28 

29 DIFF*(ABORN(LM1-ORAH)/<DRA0*0RAD) 

PKTM(K«LM)*(»KT(LM)/100.)*tPPK <I J* 11)+DJFFMPPK(!J»I! + l)-PPK<IJ«11 
1 ))) 

PKTW(K«lM)*(PKT(LM)/100.)«<PFK <I J« I !) +DIFF*(PPK (I Jt 11*1 >•■PPK U J«! I 
1 ) ) ) 

IJ*IJ*1 

PKTD(K,LM)S(PKT(LMJFlOO.><MpPK<tJ»II>*DIFFMPPK<!Jff!*l>-?PKUJ*II 
1 ) ) ) 

PlNJ<K,lM)*100.-PmLM) 

IF(PlNj(K»LH).LT.0,0) PINJ<K«LM)*0,0 
GO TO 121 

27 DRE32.9 

1I-A 

0RAD328. 

GO TO 30 
31 11*6 
ORAD*30• 

GO TO 80 
26 DRE«1.9 
13*7 

ORAD*»35. 

GO TO 30 
34 DRE*3.« 

11*6 

0RADb36,5 
GO TO 30 
24 PKTM(K,LM)*0. 

PKTW(K,L M )»100.*FICT(LMi/100. 

PKTn<K,L*M*0. 

PIMJ(K,l m >*FIRINJ<A6URH<LM>) 

60 TO 121 
33 PKTM(K,l">*0. 

PKTWU«LM»«0. 

PKT0(F«L m >*100#»PFT<LM»/ioo. 
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PlMJ<K.L M ) :: lOO«- p KT<LH) 

IF (f > !NJ(*iLM)»lT»0«0) PIWJOC.IM)*0.0 


121 CONTTNi'E 

IF(KKO' , NT.Eo,O.ANn.lSFASN.NC.l) GO TO 3» 




3 * 


oO TO 

K 2 1 

KICOUNTsl 

PF1N22*. 

PCHAsia. 

IG = 1 

GO TO 12? „ 

flENOMsB UDWJ (II «B!LOLT(I) •FLOAT (NFL 11 >) 

DENOMenENQM 


no 39 T 1*1*3 

PKDEMd !«J)sADF(in /DENO M<,p KTM/<«n tt POSPRI M 1) /100* 

PKSRM(ti,J)=ASCR(!T)/nENOM»PKTM(K,2)«BOSPRI l I!1/100* 

PKGM Ul,J) S AG«I!)/rENOM* B *TM « .3)“POSpRl(II)/100. 

PH SGM (! 1« J) s A5 r ' (IT) /nEN0^ <jO K T MU *41 »POSPPI( I!) /100. 

PKGGH (11« J)sAGG ( I!) /DfNO^^^PK^M << *POSP p I (I!) /100* 

PKGG5M(II«J)sAGGS <!I)/DENO MttPK TH(K«6)*POSPRI<11)/100# 

P<OBM<T!»J) sA065<I!)/DENO M *°<TM{<«71®P0SPRI(I!)/100, 
TKMni«Jl3 p K0E M (INJ)-*'PK$R M <n«J)*PKGM(lI*J) ♦PKSGM (II»J)^PKGGw<’*» 
1J)♦PKGGS M (!I« J 1+PKHPM(II,J) 

TKMUI. J) = TK*MtI «J)*CONPER<I» /1 00* *PEPPIN/1«E4 
PKOEWni«J»=ADF<in /OFNO M<>p KTW <K i 1) BPOSPP I (11) /100« 
PKSRW(IT«J)sASCR(I!) /OENOMPP* Tw < K »2) ttp 0S p RT (! I) /100» 

PKGW (T1«J)sAG<11 )/OENOMpP*TW<K »3> »POSPRI<11 ) /100. 

PK5GW(T I, J)=ASG< III /OFNO M * t ’K’W<K,4>“* > OSPP It II) /100. 

PKGGW ( T I«J) sAG ff (TI) /nFN0 y » o *** K ,5> <>POSPR It 11> /100. 
p <GGSw fIT ,J) sA^GS<:n/HENC^^P< T W < K.G!*POSPR!<113/100• 
p<obw<t i, j>s Arps;:n/nENC fc, '--p<' r ^f<»T)» pospp i <i i>/loo. 

T<W <II«Jl a?K n EW < TI«J)♦PKSRW(II«J)*PKGW<II«J)*PKSGW<11,J1♦PKGGW (II* 


1J) ♦PKGGsW < TI, J) +rr,n p W <! T * j) 

TKW< 11 , J) sTKW < ! I * J? '>CONPF» ' II /100» * p E&P IN/1 .E4 
PKDEP < T 1« J) =AQF (!!) /DFNO^oPK’D' 11 ppOSPR I < I! > /100* 

PKSRHn !. Jl sASCR H.’) /nEN0M«PKTO <K • 2) ^OS^RI < 11 > /100. 

PKGOU *.J>=AG < l n/DFN0^*PKTn<K,3)«»P0SPRI (ID /100. 

P<SGD(TI«J>=ASG<I!)/0FNfi M< ' p < T ^<K»4)«P0SPRI(II)/100» 

PKGGTIC11 • J > s AGO (lU/OFNO^oPKTUtK^PPOSPRnin/lOG. 

PKGGSD f 1 T , J) sAGGS < I T ) /DENO* />p < T 0 < * ♦ & > »P05PRI f X11 /100• 

P<npn(T!«JIa A^BS <!!)/TENO y,p '(< «7)PPOSPRI<II>/100i 

(11« Jl a p KOE" < TI « J) ♦P<SRl' < I ” * J) *P<GD 5! ! »J) *PkSGD (! T ♦ J) ♦PKGGD (11 ♦ 


1J)♦PKGGSOt!I,J'*P<n«D<11«J> 

TKn( TI,J)sTKO(TI ♦ JJ PCONPER <I>/IOO.PPERP 1 N/ 1 .E 4 


FACTsPOSPRT(TII/(DENOM»100.) 

P IOETI=ADF < TI) « P INJ (H »1 J PFACT 
I'ISROsASCR f1I)«PINJ 0C.2)*F ft CT 
PIGD»AG(Ti>*PINJ(K,3)*FACT 

PlSG0*ASG(in«Pl^J< ,c »4)«FACT 

PTGGHaAGGU I) « p INJ<K,5)«FACT 
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PlGGSDsAGGS (I poPlNJ <K»6) *FACT 
Pir>BnsADP$< I!) *P !NJ CK*T) »FACT 

TKl(11«j) *R IDED+PISrD+pIGO*? ! $GD* ,t ’ IGGD+PIGGSD+PIOBD 
TKI(TI,J) * r I <TI,J)»CONPFfi<I)»PERR!N/l.E6 
39 CONTINUE 

!FtKKOUNT.ECl,0,AND.ISCASN.EQ,l) GO TO 50 
*4 AOU*AOUT< l) ♦AOUT <2)+A0UT(3) +AOUT < 4) ,-AOUT (5) 

IF(AOU.LT.O.O) AOU=0,0 

I ( M,cna(iiJlnn \ y,rt« 

'w' • » \.««wc '# • u • " 4 * • “ ‘ unr * rv / 4 \j w * t f i wv i 

PKTMOU)=PKT«(K «l>«PAriO 
PKTW0( J)*PKTW<k’*l)«RATIO 
PKTDOC J)sp<tn<“ , 15 *«? A? 10 


FIOsPIMj(K b 1)OPA^IO 

IHkPRTNT.GT.O) WRITE (6»20U) AOU,ATOT,PKTHO(J> ,PKTW0(J) ,PKTD0(J) 
POO FORMAT <3FhOAOU«ATOT ,PK TMO <J) , PK TWO (J) ,PK TQO (J> ,5E17,8) 

40 CONTINUE 

IF(KPRTNT.GT.O) GO TO 55 
GO TO *3 


55 DO 46 »=1,Nq 


DO 46 TI=1,3 
GO TO <130,131,1321,11 
130 WRITE (6,133) 

133 FORMAT(9U03TAN0ING) 

GO TO 136 


131 WRI T E(6,134) 

134 FORMAT(flHOSITTTNG) 

GO TO 136 

132 WRITE <6,135) 

135 FORMAT(6H0LYING) 

136 IFUPRINT.Ie.O) GO TO 46 

WRITE (6,47) PKDFMf II, J),PK$RM< II, J> ,PKGM(II,J) , PK $GM 111 * J) ,PKGGM(II 
1 ,J) ,PKGG3M< n,J) ,PKDBM(I1«J) ,tkmui, J) »PKDEW< n, J) ,P«SRW< II ,J) ,PKG 
2W<II,J) ,Pk5GW(!I,J) ,PkGGW<H«J) »PK6 GSW (IX , J) ,PKOBW(II,J) »TKW(II,J) 
3,PKDED(II,J),PKSR0(II,J),PKGD<II,J),PKS6 D(II,J),PKGGO(I!,J),PKGGsD 
4(11,J),PK OB Dili,J)*TKDUI»J) 

47 FORMAT(43H0PFRCENT KILLED IN MONTH (DIRECT EXPOSURE)*,E15,8/35H PE 
1RCENT KILLED I*t MONTH (SCREENS)as,E15,8/40H PERCENT KILLED IN MONTH 
2 (SINGLE GLASS)=,E15.S/41H PERCENT KILLED IN MONTH (SCREENS,GLASS) 
3*,Ei5.8/41H PERCENT KILLED IN MONTH (DOUBLE GLASS)*,E15.8/48H PERC 
4ENT KILLFO IN MONTH (DOUBLE GLASS,SCREENS)*,E15.8/41H PERCENT KILL 
5ED IN MONTH (DRAPES,BLINDS)*,E15,C,5X,23H TOTAL KILLED IN MONTHs,E 
615,8/42H PERCENT KILLED IN WEEK (DIRECT EXPOSURE)®,E15,8/34H PERCE 
TNT KILLED IN W^EK (SCREENS)= ,E15,8/39H PERCENT KILLED IN WEEK (SIN 
OGLE GLASS)*,F15.8/40H PERCENT KILLED IN WEEK (SCREENS,GLASS)*,E15, 
98/AOH PERCENT KILLED IN WEEK (DOUBLE GLASS)*»E15,8/47H PERCENT KIL 
1LED IN wFEK (DOUBLE GLASS,SCREENS)=,E15.8/40H PERCENT KILLED IN wE 
2EK (DRAPES,BLiNdS)s»E 15,S,3X,22H TOTAL KILLED IN WEEK*,El5.6/41H P 
3ERCENT KlLLEt) IN DAY (DIRECT EXPOSURE)*,E15,8/33H PERCENT KILLED I 
4N DAY (SCREENS)s»E15.8/38H PERCENT KILLED IN DAY (SINGLE GLASS)*,E 
515.B/39H PERCENT KILLED IN DAY (SCREENS*GLAS$)s,E15,8/39H PERCENT 
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. u nAV innumr GLASS) *.E15,6/46H^ERCENT KlfeLCO^Ig^DAY CDOU 

1*LrOLA5*.5CPEEN5»«;El#.e/S«H PERCENT kiclcu »* — —.— 

8)* r El5.8.5X«2lH TOTAL KILLED IN DAV«,ElS.») 

46 CONTINUE 


53 DO 1°1 !I*1.3 

Fll=FIT* T Kt HI.NO) 

DDYTHSPDTTH4TKTM 11*NQ j 

OWK THsOwKTH^TKW(TI«NQ) 

191 DMTTHcnMTTH*TK M (I!«NQ) 

190 CONTINUE 

IF(KPR TNT,GT»0> WRITE 16.48) 

TDDY = L) n YTH« , PKTDO(NQ) 
TDWK3 DWK t H*PKTWO(NQ) 
TDHT3D^TTH*PKTM0<NQ) 

ODYTHIrDDYTH 

owkthi*dwkth 

DMTTHItsDMTTH 
nDYTHO*RKTno«NO) 
pWKTHOspK TWO(NO) 

DMYTHOsP*T m O<NO) 

IF (icPRINT.GT.O' WRITE(6.56) 


PKTDOCNO).PKTWO(NQ).PKTMOlNQ) 


TDDT.TDWK.TDMT 


RETURN 

END 










ttftFTC PERC MR4»XR7 

FUNCTION PERCTW(TOTMAX) 

OIMEMSTON P?OC(25) 

DATA (PFftC (!) «Isi«24) /O. * .006« ♦ 023«♦ 06 *. 13»»21 ». 39 ♦ • A65* # $75» • 595*. 

I 1 > t. d. r lit Ma . "»16 t/. S. T4. . . 7 7 . . 7 a . . 70 » . 7BA . . *fl <i . * A 1 • . ft 1 5 / 

AUVVIUU 'IfU 'Ul* - VV'| ’’ 

TIaO. 

DELTTs.2 
! = \ 

!F(70TMAX.FQ.O.) 60 to 2 
IFITOTMAX.GE.IO.) GO TO 5 

1 IF(T0TMAX.0E.TT.AN0«TOTMAX.LF.<T!*D€LTmG0 TO 3 
1F(TOTMAX.6E.1.0> 60 TO 4 

T!*TI»flfLTT 

1st*! 

GO TO \ 

3 OlFF*(TOTMAX-m/OFtTT 

PERCTH*PFRC<1 >*DIFF<>(PERf < I*1)-PERC U> ) 

GO TO 7 

2 PEROTHsO. 

GO TO 7 

5 PEROTHafll.S 
60 TO y 

A TIsl.O 
DELTT*.5 
1*6 

6 !F(TOTMAX.6E.T!»AND,TOTHAX«LE.(TI^OELTTH GO TO 3 
1*1*1 

TIsTI+OELTT 
GO TO *. 

7 RETURN 
ENO 



I 


3IBFTC FIRIN f 

FUNCTION F!R!NJ(AREA) f 

C INJURY CURVfS f'UE TO FIRE 

FIRINJ*? , '.*AREA-I50 t 0 

IF(FIRINJ.LE.O.O) FIRINJsO.O f 

IF(FIR!nJ. 6E.1O0.) FlRlNjslOO, * 

RETURN 
ENO 


F 
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SIDFTC NUCL 

SijnpnijTTNr uiJCL AP (^Diurt 

COMMON/BU?/ G?X,GZY,XX,Yn.SS,SN.SW,SE.S 1.S2,PHI 
COMMON/BtKV W.HB.ViS.XO.FFR.AIRnEN,ISEASN.TODAY 

COMMON/BU4/ AVEHT,AVEWT.AVEW.AVEL,HMAx,Ai,A?»A3»A4,A5.D1.DZ.D3.D4 
l.D5.Wl,w?,W3,W4.W5.l<A.AT0T,DlSMAX,nELTD,FACTl,FAeT2. INDX (5) .AAAC5) 
2,INDX1 ,iNDXj>,PFRPIN. PoPON.REACSI.REACST.REACLY 
COMMON/BLXY/ NM.PERCWI CIO) IP0BILDC10) .BMLDWClO).BILDITCIO).CONPER 
1(10).BTLOW!(10),PO$PRO(3>.POSPRI(3)♦NFL<10)* AINTRL <10). EXRLCIO), 
2PBREAK UO) , IWALLTC10) , I0T CIO) .PERCOA.BRDHT (10) 

COMMON /BlK 11/ WALPAN(IO) .WALDEN(10).FLORTH(IO).FLORONC10)♦ROOFYHC 
110).ROOFDNCIO).BASETH(IO).»ASEDN(10).SOILDN(10)»SiLHT(10).PERSCR(1 
20).PER$G(10).pfRGGClO).PERUBSC10)♦PERG(10).PERDEUO).PERGGSCIO) 
COMMON/BLK13/ AvEWTP.rADG♦RADN.DHBO,DDBO.DMBO.DHBI»DDBI.DMBI. 
1DDJ0NI,DWlON!.DM1 ONI.DDIONO.DWfONO.DMJONO 
COMMON/BLK14 /T!I.TIOiDII.DIO.FII 10*RII»R10.TUNINJ,TFATAL*TAINJR 
DIMENSION XFLORMCIO).WALPA(10).KROOFM(IO)»TRHO(10.100)»ATTG(10.100 
1).ATTN CIO,100).RHOXC100).CELLA CIO).PCAFFC10),PCAFC10,100).TIMRADCl 
20,100) .TAEXC16),PK0C10),TIMROC10)«BASETC10).ROOFT(10>.FLORTC10), 
3KWALMT(10).PKBILOC10 ).PKFLOr(100) 

DO I ON Ir0.0 
DWION I * 0.0 
DM I ON Is0 . 0 
R 10=0 * ^ 
p 11 = 0 • r* 

NBR = 1 

IFCNN.LE.l) NB»=0 

KAVGMTr4 

RGsRADfi 

RNsRADN 

no 111 1=1,NN 

RlTN=0,n 

00 = 0.0 

DW=0.0 

DM=0.0 

IF CROOFpN(T)«LT.55.* KR00FM(I)=3 

IFCROOFDN(T),GE,55.»AND.ROOFDNCI),IT,110.) AROOFMCI)*! 

IFCROOFDNC T).GE.110.) KROOFMC1)=2 
IFCFLOBON(T) .LT.55.) KFtOR M <ns3 

IFCFLORDNC T) .GF.55,, AnD.FLORDNC I) •LT.UO.) KFLO^M C!) =1 
IFCFLOPDNCT) .GF.UO.) XFL0RM(1)=P 
IFCWALOEN(I).LT.55.) XWAi.MT<I)=3 

IFCWALOENCT) .Gt,55., And, WALDEN (I) .LT.UO.) KWALMT(I)=1 
IF (WALDEN(T).GF.110.) *WAlMT(I)=2 
TFCKPRTNT.FQ.O) GO TO 40 
WRITE (6,41) I 

41 FORMAT C14H1BIJ1LDING TYPE,!*) 

40 NFsNFLCI) 

DO 167 MBl.NF 
167 PKFLOR CM) =0 , 
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IF (PHI ,6E..7ft5'i) 60 to 80 
ES*S? 

Wla0!LOL T (t ) 

AWjeAVfi 
60 TO *1 

80 esasi 

WlsBlLOWl(?) 

AWjaAVrw 

81 THETAsATAMH8/*0> 

RHORnsAVFWTB/(AVEHT«AVEL°AVEW) 

P*(AVfHT»xn/MB) /(ES-rAWD 

LP*P 

XLPrLP 

IF<(P-XLP).GT..2) GO TO 30 
IF(XLP,E0.0.) 60 TC 99 
!F(XLP,GT.P.) r.o TO 4o*> 

GO TO M 

30 XIP=XLP*1. 

IF(XLP >LF,?,) 60 TO 31 
403 XLP=?. 

GO TO 3) 

99 XIP=1. 

31 NFsNFL(I) 

MMs 1 

IF(THrTA lL F 1 .2816) GO 70 1 
»F(THET 4i6 f,i.^o9\ GO TO 2 
WAIPA ( ’ \ =,JALPA M < I ‘ / (COS(THETA)* 12»> 

PLOPr , Dspl ORTH <tj /(SIN {THETA} »1?,) 

POOFT / 1)srooptw< n/<SIN(THETA 
PA5 ET(T)shASFTH(I)/(COS(THETA}® 12.) 

CELLA(t) = (10,<»WI) '(HB/'O) 

XN=W!'> (HO/XO) /10. 

61 N T = X M 
XNTsNT 

!F < (XN-XNY) a T * .55 60 TO 8 

ntsnt^i 

GO v 0 3 

P IF(nT,FQ«01 60 TO 9 
3 MMb l 

I f (BASFTH{I)« EO,0») Go TO 4 
NF*NFL(I)♦ ! 

48 TMICX=S./SIN(T ETA) 

62 TRHO(l.l)s<BASFT(I)«RASETiN ' 1 ) *$OHDN( I)® THICK) 
TRH*THHf) (1*1) 

KKl*l 

CALL ATTFN"(TRH.KKL»THICX. a ’G»ATT> 

ATTS«ATT 

KXL*2 

5 THICXsBASETm 

CALL ATTFN"(TRH.XKL♦THICK»ATC" ATT) 
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EXNF=NF 
nn tj M^l.wc 

DO 72 Ms1«nV 

PKFlOR(M) =PKFL*R(M)*PC AF(M ♦ N) 

72 CONTINUE 

PKFLOR(M)sPKELOR(M)/EXNT 

73 CONTINUE 

IF (KPRtNT.FQ.O) GO to 20 
WRITE <6*161<P<FLOR<M1,Mel,NF) 

16 FORMAT (26H0PEPCENT KILLED PER FLOORS,E15,6) 

20 PKRILDU>«!>, 
no 74 Mb1,NF 

PKRILDU) aPK8UD( It ♦PKFLOR (Ml 

74 CONTINUE 

PKRILOm aPKBUO(n/EXNF 
IF ((CPRTNT,FQ, 01 GO TO 111 
WRITE (6'17)PKRlintn 

17 FORMATI2NHOPFRCFNT KILLED bulLDlNG=,El5.8) 
111 CONTINUE 

PKINSO. 

DO 112 1=1.NN 

11? PK IN = Pnr IM.PKPIIO < I) *CONPFR <11/100- 
IF'KPRTNT.FQ.Ol go TO 21 
WRITF (6.113) "KIN 

113 FORMAT(23HOPFRCENT KILLED INSIDE=*E15.»; 

21 KKQlJNTsl 

64 OUTAx$laB IL DL T (I) *S?» (8ILDWI ( 1 > •►SI) 
IF(NBR.EO.n) GO TO *5 
!F(THETA,GF.1.T09) GO TO 65 
PKO< 3)=0,0 

IF<TMETA,GT,,2A16) GO TO 66 
JF(?HI,GT.,7A54) GO TO 83 
FXPARAsSIMBILOlT ( n + S2) 

SHAREA = S2*«ILDWI U) 

GO TO 46 

63 EXPARA = SZ«<BIL r, Wl (D+Sl) 

SHAREA = Sl»BROlT<!> 

66 JJxKKQUnT 

RAONGsRADN+RADG 

CALL AFFFCT <RA"NG,PFRCAF,TlMDTHi 
PKO(JJ)=P£RCAF 
TIMR0(JJ)sTImDtn 

103 GO TO (104,100,108).KKOUNT 

104 TRHaRHOHnoTHTCK 

kkl=kavg m t 

CALL ATTEND(TRW.KKL,THICK,ATG,ATT) 

RADG=RAnG»ATG 

raon=radn*att 

KK0l)NT = 2 

GO TO *6 
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WR!TEU*300j(AtTG (M,M) ,ATTM(«.M) *Msl,Nn 

300 FORMAT (6H0ATTG'-«E15.9«6H A^tn's, £ 15,fi) 

6 IF((N-NT).EQ.01 GO TO 12 

N3N» 1 
MMs 1 

GO TO 50 

1? iFlRAS^TWU) .EQ.O.) GO TO U 
!F(TMetA.LF..2fl6) GO TO 11 
NFaNFLf11*1 
GO TO 10 
11 NFoNFLUJ 
10 DO 35 M=1,NT 
DO 35 Mal,NF 

96 RAONes0AnG«ATTO<M«N1*RAON»ATTN(M,N> 

CAU AFFECT (RADNG»PFRCAF«TIMDfH) 

PCAF(M f N)a^E«>CAF 

TIMRAD»M«N)=TIMDTH 

C0M5TsPERCAF*C^NFER <I) /I ,t<* 

PCAFTN»1,0-C0N5T 

IF(PERCAF.LE.C.O) PCAFINsRADINJ(RADNG)/100. 
RIIN3RT1‘J-*«»CAF1N 

TF(TlMnTM,GE.0.,AND,TlMDTH.LE.1.0) GO TO 121 
!F(TlMnTW.r.T,1.0.AMn.TIMDTH„LE.7,C) GO TO 12? 

IF(TIMDTM.GT.T.OI GO TO 123 
GO TO 35 
1?1 T)D=DTHroMST 
GO TO 35 

122 nw=nw*co*JsT 
GO TO 35 

123 OM*n M +COMS T 
35 CONTINUE 

CONSTsNT*NF 

DDIONIanPlONT^DD»PERPIN/(10O.*CONST) 
DWIONIeOWlON!> n W»PERPlN/(lOO.^CONST) 
DMIONI*n M IONI+nM0PEOPiN/(lOOt*CONST) 
RII*Rll^RlIN«PFRPlN/(lO0.*CONST) 

IF(KPRINT.EQ.01 GO TO 7 

WRITE(6.301) ((TIMRAD(M.N).PCAF(M.N)*Msl,NF>,N»1,NT> 

301 FORMAT(6H0TIMRAD=iE15.6.6H PCAF=,E15,8) 

7 IF(BASETH(I).NF.0.1 Go TO 200 
GO TO ?0l 

200 IF(THETA.lE,. 261ft) GO TO 203 
GO TO 201 

203 PCAF(1»11sO, 

TIMRADd.lIslOOOO, 

nll*nf*i 

DC 202 M«2»HLL 
PCAF(M,N)sPCAF<M-1«1> 

202 TIMRAD(M.1)sTIMrAD(M-1,1) 

201 EXNT*NT 
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TRHsTRHO<M»N) 

KKIsKROOPMU) 

thicx=rooft(i) 

CALL A T TFN ,l ( TB M?KKL.THlf.K«ATG»ATT) 

ATTG(M«N)a A. TO 
ATTN(M,N)3ATT 

13 TRHO(M,MlaWAL^ A n)®< 1 ,«SQRT (PERCWl(I)/lOO«))*WALDE N n) 
TRHsTRHO<M«N> 

THlCKswALPAIT) 

ICKL=s<WAL M T < I) 

CALL ATTPNlMTRH f KKL «TH1CK «ATGt ATT) 

ATTG<M,N>aATG 
ATTN(M,N)sAT T 
IF(NBR.EO.O) GO TO 15 
34 IF<0ASETH(T),EO.O.) GO TO 39 
EMsM-1 

79 IFCNRR.FO.O) GO TO 15 

IF(THETA,LF..2F18) 00 TO 60 

1F(EM ,LF »(*AVEHT-tAWI+E5) # ^B^XO)/10•1) GO TO 32 
JF<(EMoiO.),LT,(AVEHT-ES#HB/XO)) GO TO 33 
GO TO 15 
39 EMsM 

GO TO T<j 

32 RH0X ( M) sPHCBTloAWl^XLP/SIN < ThFTA) 

TRMsRHOX(M) 

THlCK=AWlttXLP/5lN«THEYA) 

kklskavgmt 

CALL A'fTPN l MTRH,KKL«THlCX»ATG«ATT) 
ATTGlM,N)=ATTG(M»N)OATG 
ATTN(M.n)=ATTN(M tN)»ATT 


33 RHOX?M) = (RHOPP/SIN(THETA)><>(AWI*XLP-<1C»«EM*E5*XLP«MP/X0)) 
TP HsP HO x(M ) 

THICKst(AWI#XLP-(10* «EM+Es°XLP u HB/XO> > / Sl N < THETA) 

KXLaK avg*t 

CALL ATTFNI*tTRH|KICL«THlCX»ATGiATT) 

ATTG<M,N> sATTG <M»N)«ATG 
ATTN(M*N)sATTN(M«N)OATT 
GO TO 15 

ft0 !F((EM*10.).GE.AVEHT) GO TO 15 
RHOX(M) sRHOBD»AWl#Xl.P 
TRHsRHOX <M) 

TMICXaAwloXLP 
KKL*XAvGMT 

CALL ATTFNIl (TRW, XXL«THICK *ATG« ATT) 

ATTG(M,N)sATTG IM»N)«ATG 
ATTN(M t N)=ATTN(M.N)«ATT 

15 CONTINUE 

IF(KPRINT.EQ.O) GO TO 6 
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ATTGCUllaATC. 

ATTN 11«1)sATT*ATT$ 

MMa2 
GO TO 4 
4 NT*i 
GO TO 3 

2 trtftASFTHUi .EO.O.) GO to 54 
NF*NFUmt 
55 NNF*NF 

Tt?MO<NNF*i) sPQOFTM<!) oPQOFDNll1/12. 
TRMsTRHO(NNF«l) 

THICKsftOOFTHf n/12, 

KKL=KRnoFM<1 ) 

CALL ATTFNIMTRH.KKL.Th’C< t ATG*ATT) 

ATTG <NNF»11*ATG 
ATTN(NNF«l)sAT* 

44 NNFsNNP-1 

IF(NNF.EO.O) G" T 0 4' 

TRHO(NNF« P sFLOP^*^ (T ) »F'„ORTH( I) /12. 
TRHsTpMO(NNF«1' 

THICKsr L nRTH<I)/l2. 

KKL*<FLnPM(I) 

CALL ATTFN'MTRu,KKL«THICK, At",, ATT) 
ATTG(N»IF*1J sATG«ATTG(NNF+1«;. 

ATTN (NNF « 1)sATT»ATTN(NNF+l* 3. 

GO TO 44 
4 7 NTs! 

GO TO 12 
<54 NFsKIFL ! 11 
GO r O 4 5 
1 NT=1 
MM=1 

ROOFT(T)*RnoFTW(ll/)2. 

WALPAmawAL°AM<n/12. 

FLORT < T ) sFl O 9 -M!>/12. 
CELIA<!)=10.*W! 

4 Ns 1 
71 XNFsNF 
SO DO 15 MsRM«N r 

IF(N.EQ.T) GO TO 13 
IF(N.GT.I.ANO,M,EQ t NF; GO T 0 14 
TRHO(M.N) sFLOR 7 ( IXiPLORDN < D 
TRHaTRHO<M«N) 

THICKsFLORT(!) 

kkl*kflo»mU > 

CALL ATTFNH(TRH t KKL»THICK *ATG,ATT! 
ATTG(M f Ni*ATG*ATTG(M-*-l,N-l> 
ATTN<M*n!»ATTN«MM*N-1> *ATT 
GO TO IS 

14 TRHO(M,N)aROOFT( n«ROO* r DNC!) 
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100 tFCPKnm .Fo.o.) G^ r * 140 
!F(P< 0 f 2) . r Q.0 4 ) GO T 0 141 
IF(THETA,lE..261*1 GO TO 143 
00 144 

140 !F(PK0(2>.EQ.O.) GO TO 142 

PCAFOs f PK 0(1)*rxPARA*PK0<2> *$HARFA)/OUTA 
TiHQu 7 = TT Hk 0( 2 » 

GO TO 110 

141 PCAFOs(PKOm*FXPARA*PKO(2>*5HARCA>/OUTA 
TlMOUTsTIM»0» H 

GO TO 110 

142 PCAFO=0.0 
TIMOUTslOOOO. 

GO TO 110 

144 PCAFOs(pKOl1)»FXPARA + PXO<2) tt 5HAREA)/OUTA 

TI MOUTs (T IMRO < t) «»EXPARA<»T1MR0I2> ®SHA»EA> /OUTA 
GO TO 110 

143 PCAF0s(PK0(11^PK0I2))/2. 

TIMO()T*(T1 M RO<1 )*TIMRo(2) 1/2. 

GO TO no 

85 SHARFAsO, 

FXPARAaOUTA 
KX0UNTa3 
PKO(l)= 0.0 
GO TO 46 

106 PCAFO=»kO<JJ) 

TIMOUT=TTMRO<3) 

GO TO no 

88 RSTAR=AVFHT»X0/H8 

!F(RSTAR,lT.F51 GO TO 87 
RSTAP=FS/2. 

GO TO *9 

87 RSTARsRSTAR/?. 

8R THICf = AvFHT/SIN(TMETA j-RSTAR/COS ITHETA) 

$HARFAaRSTAR*AWI 
FXPARA=0"TA-5HAREA 
KKOUNT s1 
GO TO 46 
110 0010^0=0.0 
owio*o*o.o 
nMioNo=o.o 
00 124 1*1.3 
AREA*EXPARA/nu?A 
IFU.EO.?) AREAsSHARFA/OUTA 

R!1N*100,-pkO(T) . „ 

IF ( PK 0 ( I ) .IE.0» 0»ANP. ( .NOT* <! .EQ. 1 .AND f KKOUNT*EQ* 31 1 .AND. (.NOT. (I. 
1EQ,3.AND,KF0UNT,LT,3)j) R11N*«AO INJIRADNG) 

IF ( ( I. FQ. 1 .AND.KXOUNT.FQ.3) .OR. ( I . EQ * 3, AND. KKOlJNT.LT. 3) ) RIIN*0.0 
RlO*RIO^Rl!N/100.«ARFA«U.-PER p lN/100.) 

PK=PXO(I>/100.«AREA*(1.-PERPIN/100,) 
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IF(T!M»0U> .6E.O..AND.T!MROtn .LC.1.0) POIONO«DP10NO*PIC 
!FtTlM«»o<I) .0Y.1.0.AN0.TTM»O<!) .U.T t O) DwTONO«DWlONO*PK 
IF (TIHPO*!) »6T,7,0 ,ANo % TtMRO< 1!) .lE.2e»0) U"' IONOsortiONU^rit 
124 CONTINUE 
R aogsrg 

PADNaRM 

IF (KPRJNT.EQ.O) GO TO 22 
WRIT? (b« iSiTfMOUT «PCAFC 

IS FORMAT (2?H0TTME OF PEATH <DAY5)s<*E15,6.21H PERCENTAGE AFFECtED*«F 1 
15. Si 

22 RETURN 
ENT1 



MAFTC AFFE M94.XP7 

SUBROUTINE AFFECT (RADnG«»*ERCAF,TIMDYM) 

DIMENSION TAEX<15),PCAFF<10) 

OATA(TAFX(LL) ilLslil6>/28.«25..20.5,l6,3,l3.1,10.5(a.2(6,A»5.2*4.1 
1S«.1.25,2.5(1,75,1.1..5.01/ 

DATA<PCA^FILL).Ll*li10>/9.♦19.«♦27.7,36.5,49.5,61.3.75.0»6e.5,95.5 

1«1G 0 • / 

94 IF<RADNG.LT.250.) GO TO 22 
IF<RADmG.GF.?0<\> 60 TO 23 
11*1 

ORAD*250, 

25 IF<RADMG,GE.ORAD.AMn,RADMG.LE.(0RA0*50,i) GO TO 24 
0RAD*0OAn*50, 

I!*11♦! 

GO TO 25 

24 PC2*AtOG<PCAFF (11*1)) 

PCl*ALOGtPCAFF(II)) 

OIFF*(RADnG-ORAD)/50, 

XN0*PCl^niFF«(PC2“PCl) 

PERCAFeEXP(XMO» 

.36 !F(RADmG.GF,9000.) GO TO 65 

IF<RADMG,GF.?5",.ANr),RA0NG.LT,4C0.5 GO TO 26 
IF(RADMG,GE.400 ,,ANO,raDNG.LT, 600,) GO TO 27 
IF(RADWG.GF.60«..AND,RADNG.LT.1500,) GO TO ?8 
GO TO 29 
2? PERCAFsO. 

TIMDTHslOOOO. 

60 TO 400 
23 PEPCAFslOO. 

GO TO 3ft 
2ft TIMOTHs112. 

GO TO 400 
2T TIHDTH*5ft, 

GO TO 400 
2P TiMDTH*2A. 

GO TO 400 
29 LL=1 

CRADS1500, 

38 IF(RADNG.GE.CRAD.AnD.RADNG.LE.<CRAD* 500.n GO TO 37 
CRAD*CRAr*500. 

LL*LL*1 
GO TO 38 

37 DIFFs<ftADN5-CRAD)/500. 

TIMDTHsTAEX(L.->+ 0I pFtt <TAEX H_l*l)-TAEX <LU) 

RETURN 

65 TIMDTHsq. 

400 RETURN 
END 
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MRFTC ATTEN M*>4«XP7 

SUBROUTINE ATTrNU«TOH,KKL « t ^ICX,AT6*ATT) 
YHICK«»HTCK«12* 

*b ; «ruiii = m i it 

IF tARS(T»>•G^rso* > ee *o IS 

AT6«EX»><Tr> 

GO TO 401 
It ATG*0« 

401 GO T0(S6*6T,66*70)»KKL 

66 EXaTHiriC*.064345 
GO TO 69 

67 ex»THiri(*.l 
60 TO 69 

66 EX«THKK».00607 
GO TO 69 

70 EX«THICK*0.1*TRH/135. 

69 IF(A«5<EX>.GT.30*) GO TO 51 
AT7al,/()0.**E v ) 

60 TO 56 
51 ATY*0. 

56 RETURN 
END 


SIBFTC RADIJ 

FUNCTION RADINJ<D0SE) 

C INJURY CURVES DUE TO IONIZING RADIATION 
RADIWJ*A.45»O0S(r-613. 

IF(RADINJ.LE.O.O) RADlNJeQ.O 
IFIRADTNJ.OJ.IOO.) RADINJ'100# 

RETURN 

END 


i 
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appendix V 

TABLES AND RRAPHfi 

Tables 23 through 26 and Fig. 66 through 72 summarise 
the data employed in developing the various mass-velocity- 
probability relationships For Table 5. Conventional statlstl- 
oal analysis techniques were employed In determining the values 
and models. Concussion to the head and cerebral hemorrhage 
have not been treated. 
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Table 23 

DATA ON PENETRATION OF THE ABDOMEN OF DOGS BY GLASS MISSILES (Ref. 8) 
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DATA ON SKULL FRACTURES (Ref. 10) 
(Effect Number 7) 
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